2015-01-07 219 views
1

我想基於另一個細胞中發現了一些(更改基於數據)VBA來自動填充行

所以說電池D2 = 250自動填充在一列列的具體數量的具體數量

我需要標註FF4:用數字1,2,3,4,5 FF ...所以它看起來像這樣

 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) 

任何幫助?

+0

爲什麼反對投票? – user3682157

+0

不確定,它看起來像一個堅實的問題@ user3682157 ... – Chrismas007

回答

2

假設你有FF4值自動填充了下來:

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

你要添加Dim MyValue As Long以避免出現錯誤,因爲這將確保D2的值是一個數字,當你移動它進入MyValue

+0

使用'長'而不是整數 –

+0

現在快樂@chrisneilsen? – Chrismas007

+0

ahh只是缺少那個&符號 - 所以我有一個問題是,FF4的值是「1」,並且使用這個宏,它只是使用一個宏來填充整個列。也許我應該更清楚,我需要它來閱讀1,2,3,4等... – user3682157