利用Excel制作電子表格時，有時需要用到計算填充功能，F列每種元件的價格合計，就是由E列元件單價乘以D列元件數量得來的。通過分析，發現利用Excel97提供的VBA(VisualBasicforApplication)功能，寫幾行Basic代碼即可方便地達到自動填充F列數據的目的，且計算結果為純數據值，可以自由進行處理。具體實現步驟如下：
1. 建立Excel工作表，分別填入其它相應的數據，包括E列元件的單價和D列元件數量。
2. 點擊“視圖”→“工具欄”→“VisualBasic”→VB控件工具箱。
3. 在整個工作表的底部或適當的位置放置控制按鈕“CommandButton1”。
4. 雙擊控制按鈕，加入語句：
PrivateSubCommandButton1_Click()
DimiAsInteger’自動填充的行號
DimrandAsString’工作表D列的范圍參數
DimraneAsString’工作表E列的范圍參數
DimranfAsString’工作表F列的范圍參數
Fori=2To12’12為本例中給出的填充結果行號，可由使用者自己設定’該循環主要完成工作表F列計算表格的 自動填充
rand=″D″＋CStr(i)
rane=″E″＋CStr(i)
ranf=″F″＋CStr(i)
Worksheets(″Sheet1″).Range(ranf)=Worksheets(″Sheet1″).Range(rand)＊Worksheets(″Sheet1″).Range(rane)NextiEndSub
5. 按執行鍵，就可達到設計要求的計算表格項的自動填充，且填充結果為純數據。
Excel提供了VBA功能，使我們可以根據需要對其進行適當的二次開發，仔細研究其用法，會使制作電子表格的工作更加輕松。
