Excel表格中添加數據的時候，有些數據高度重複，或者是相同公式内容。

這樣就沒有必要一一添加，不僅浪費時間，而且也是一種比較枯燥的重複性勞動。

假如數據量十分龐大，那麼就是一件十分無聊的事情，并且出錯率明顯提高。

在此情況下，一種簡單的操作就出現了。

Fill填充

填充有四個方向性的走勢，即從下向上、從上向下、從右向左、從左向右。

這樣就有四種填充方法：FillUp、FillDown、FillLeft、FillRight

其具體方法介紹如下圖

我們以一個例子來介紹，這四種填充方法。

其功能十分簡單，就是把某一個初始單元的内容填充到所定義的單元格集合裡。

本例将分别将公式"=Row()-1"或"上填充"文字填充到A1:A20單元格和B1:B20單元格内。

左右填充同樣以不同内容進行填充。

其整個步驟十分簡單，隻需要二行代碼即可完成。

首頁給基礎單元格賦值，也就是說其它單元格要填充什麼内容就是給這個基礎單元格賦什麼值。

本例将給A1單元格賦值，向下填充。

Range("A1").Formula="=Row()-1"

Range("A1:A20").FillDown

其主要一個重點就是對基礎單元格進行定位和賦值。

四個方向填充，基礎單元格位置是不同的，向下填充就是最頂部單元格為基礎，向上就是最底部單元格，向左為最右，向右為最左為基礎單元格。

一定要分清楚方向，如果方向感十分模糊，那麼填充就會出現不可預知的錯誤。

示例代碼

向下填充

Private Sub RangeFillDown() With Range("A1") .Formula = "=row()-1" .Borders.LineStyle = 1 .Interior.Color = RGB(121, 251, 251) .HorizontalAlignment = xlCenter With .Font .Size = 12 .Bold = True .Background = xlBackgroundTransparent .Color = RGB(221, 1, 1) End With End With With Range("A1:A20") .FillDown End With End Sub

向右填充

Private Sub RangeFillRight() With Range("A2") .Formula = "向右填充" .Borders.LineStyle = 1 .Interior.Color = RGB(221, 111, 251) .HorizontalAlignment = xlCenter With .Font .Size = 12 .Name = "微軟雅黑" .Background = xlBackgroundTransparent .Color = RGB(21, 1, 1) End With End With Range("A2:O2").FillRight End Sub

其它向下、向左方法雷同，不一一寫出代碼來了。

如果對此有很好理解，在對相同數據進行處理的時候，就十分方便了。

歡迎關注、收藏

更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!