如何在VBA中使用自動填充功能？

我試圖讓自動填充選項工作。對於一種情況，我只需要複製單元格中的值。在另一個公式（但我猜這與複製一個值的作用相同？）。如何在VBA中使用自動填充功能？

這個選擇我要一路向下複製到最後填充的單元在B列

Range("A1048576").End (xlUp)

只需添加filldown選項不起作用的細胞。 .Select或.Value的任何組合都不起作用。

當我試圖通過使用此代碼來簡化它，填充選項也不起作用。

Range("A11").Select 
Selection.Filldown

有人有想法嗎？

來源

2017-07-20 BHeerschop

你只得到了一個單元。向下填充需要填充一系列單元格 - 範圍（「A1：A11」）。填充將取A1中的值並填充至A11。 –

它總是好的，如果你可以使用這樣的任務的宏錄製，然後編輯結果刪除Select和ActiveCell：

Option Explicit 

Sub Makro1() 

    Range("A1").Select 
    ActiveCell.FormulaR1C1 = "123" 
    Range("A1").Select 
    Selection.AutoFill Destination:=Range("A1:A11"), Type:=xlFillDefault 

End Sub

來源

2017-07-20 08:10:03 Vityata

如何在VBA中使用自動填充功能？

回答

相關問題