Autofill op basis van laatste rij

[Ralf1991]

Beste lezer,

Ik ben op zoek naar een autofill code die onderstaande formule in cel B1 zet wanneer A1 is ingevuld, in B2 wanneer A2 is ingevuld enzovoort.
Ik heb onderstaande conde gevonden alleen werkt dit niet goed.

Ik hoor graag.

Lastrow = Range("A" & Rows.Count).End(xlUp).Row
Range("B1").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-1],'Input Caslijst'!C[4]:C[23],19,0)"
Range("B1").AutoFill Destination:=Range("B2:B" & Lastrow)

 

[snb]

maak een tabel van range("A1:B1")

 

[Ralf1991]

Hi SNB,

Ik begrijp niet precies wat je bedoelt? Het aantal ingevulde cellen in Kolom A varieren steeds van 1 tot misschien wel 50.

 

[snb]

Juist, kijk daarom eens naar tabellen invoegen in Excel.