序號自動填充的兩種技巧 excel序號自動填充公式 _序號

工作表中填充公式步驟是先寫好一個公式，然后用鼠標拖動進行填充。那如何用 VBA 代碼給單元格填充上公式？
Range.AutoFill 自動填充 “方法” 。語法：Range.AutoFill 填充區域，Type

文章插圖
【序號自動填充的兩種技巧 excel序號自動填充公式】參數1：填充區域，填充區域要包括源區域。源區域是什么？在工作表中填充公式，首先要在一個單元格中寫好公式，然后拖動（或雙擊）進行填充，這個寫了公式的單元格就是源區域。
參數2：Type 類型：常用的幾項值：xlFillDefault 數字簡寫 0，xlFillCopy 數字簡寫 1，xlFillSeries數字簡寫 2，xlFillformats 數字簡寫 3，xlFillvalues 數字簡寫 4。
首先要給1個單元格寫入公式 Range(“E2”) = “=COUNTIF($A$2:$A$19,D2)” ；用代碼給單元格寫入公式雙引號里面要加等號，前面的單元格不能簡寫為[E2] 。公式中對單元格的鎖定與在工作表中寫公式一樣。
第2條語句 Range(“E2”).AutoFill Range(“E2:E9”), xlFillDefault；自動填充完成。

文章插圖
但上述語句是按行向下填充，如果要列方向向右填充如何寫呢？

文章插圖
列向右填充，首先要把行方向填充完成后，然后再向列方向填充。寫上第 3 條語句：Range(“E2:E9”).AutoFill Range(“E2:F9”), xlFillValues ；這樣就會向右填充列方向。Range(“E2:E9”) 這個區域不能寫成Range(“E2”) 。
下面講解一下Type 參數，xlFillCopy 將源區域值與格式復制到目標區域，效果：