VBA для автозаполнения заданного числа строк

Question

Я пытаюсь автозаполнение определенного количества строк в колонке на основе числа, найденное в другой ячейке (которая изменяется на основе данных)

Так сказать клетки D2 = 250

мне нужно маркировать FF4: FF с номерами 1,2,3,4,5 ... так, что он выглядит как этот

 Column FF 
Cell 4 1 
Cell 5 2 
Cell 6 3 
Cell 7 4 
...  ... 

Я играл с чем-то вроде это не работает

Sub AutoFillSpecific() 

    MyValue = Range("D2").Value 
    Range("FF4").Select 
    Selection.AutoFill Destination:=Range(FF4:FFMyValue) 

Любая помощь?

Answer 1

Если у вас есть значение в FF4 для автозаполнения вниз:

Range("FF4").Value = 1 
Range("FF4").AutoFill Destination:=Range("FF4:FF" & MyValue), Type:=xlFillSeries 

Вы хотите добавить Dim MyValue As Long, чтобы избежать ошибок, потому что это будет убедиться, что значение D2 представляет собой число, когда вы перемещаете его в MyValue.