30. april 2022 - 15:20Der er
2 kommentarer og 1 løsning
Copy formel indtil side aktiv række
Kolonne B er der forskellige tal som skal divideres med 1000000 resultatet skrive i kolonne C, det skal den blive ved til sidste celle med tal i kolonne B
i C1 kan du sætte =HVIS(B1="";"";HVIS(ER.TAL(B1);B1/1000000;B1)) og så kopiere den nedad. Tomme felter i B forbliver tomme i C, og kun tal beregnes, andre (tekst) kopieres bare.
Sub Divider() Dim LastRow as long Dim C As Range LastRow = Range("B" & Cells.Rows.Count).End(xlUp).Row For Each C In Range("C2:C" & LastRow) C = C.Offset(0, -1) / 1000000 Next End Sub
Synes godt om
1 synes godt om dette
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.