Avatar billede Nuser2008 Mester
08. december 2021 - 23:16 Der er 1 kommentar og
1 løsning

Indsæt formel efter sidste celle i specifik kolonne

Hej Forum

Jeg har brug for jeres hjælp til et spørgsmål om VBA i Excel :-)

Jeg har data i kolonne A (A2:A10000), mens jeg i kolonne B har data i B2:B7000. I celle B7001:B10000 skal jeg indsætte værdien fra kolonne A. Hvis værdien i A9966 er 1234, skal værdien i B9966 også være 1234.

Næste måneds datasæt består måske af 15.000 rækker i kolonne A, og hvor der fx er data til og med B12784. Jeg har således brug for en formel, der kan håndtere et variabelt antal rækker.

Jeg har formlen til at "springe" ned til B7001, som er den første ledige celle i kolonne B.

Spørgsmål 1:
Hvordan sætter jeg formlen i B7001 op, så jeg får værdien fra A7001? Som jeg ser det, skal der lidt mere til end bare: =A7001, for jeg ved jo ikke på forhånd, at det altid er =A7001, der skal anvendes.

Spørgsmål 2:
Hvordan får jeg derefter kørt formlen i bund til B10000?

På forhånd mange tak for hjælpen.

Hilsen Arne
Avatar billede jens48 Ekspert
09. december 2021 - 00:20 #1
Måske kan dette bruges

Sub test()
Dim LastARow, LastBRow As Long
LastARow = WorksheetFunction.CountA(Range("A:A"))
LastBRow = WorksheetFunction.CountA(Range("B:B"))
For x = LastBRow + 1 To LastARow
Cells(x, 2) = Cells(x, 1)
Next
End Sub
Avatar billede Nuser2008 Mester
09. december 2021 - 09:46 #2
Hej Jens

Mange tak! Det virker helt perfekt!

Hilsen Arne
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester