VBA自动填充特定行数

Question

我尝试根据另一个单元格中的数字（根据数据进行更改）自动填充列中的特定行数

所以说单元格 D2 = 250

我需要用数字1,2,3,4,5标记FF4：FF 250 ......这样看起来像这样

       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以避免错误，因为当您将其移至MyValue时，它会确保D2的值为数字。