2021-05-12 14:32:11
EXCEL技巧——用求和按鈕實現任意區域求和
EXCEL在處理資料的過程中,我們經常用求和函數SUM來進行求和,但是這個函數在計算式,總是要輸入一系列的函數,才能實現,而且不同的表格要重新輸入函數,很麻煩,還只能對特定區域求和,太不方便了,現在我們用一個按鈕,藉助VBA程式碼來實現不同區域的求和,只要按一下按鈕,就可以求出任意區域的和,去哦們一起來揭開它神秘的面紗吧!
1
新建一張工作表,命名為「求和」,在表中有九(2)班5次診斷考試的成績,我們就給他的任意區域進行求和,如圖所示。
2
單擊選單欄中的「開發工具」——VisualBasic,開啟VBA編輯器,如圖所示,我們將在編輯器中插入程式碼來實現求和功能。
3
開啟了VBA程式碼編輯器,單擊選單欄上的「插入」——模組,開啟程式碼編輯視窗。
4
現在我們來輸入程式碼:
Sub 求和()
Dim r
Dim t As Long
For Each r In Selection
If IsNumeric(r.Value) Then
t = t + r.Value
End If
Next
MsgBox "你選擇的區域數值之和為:" & t
End Sub
5
回到「求和」工作表,單擊選單欄「開發工具」——插入——按鈕,出現十字箭頭,用滑鼠左鍵拖出一個矩形按鈕,現在出現了按鈕,同時出現了「指定巨集」對話方塊,在對話方塊中選擇「PERSONAL.XLSB!模組2.求和」巨集,單擊確定。
6
選擇按鈕,單擊右鍵,選擇「編輯文字」,是按鈕名稱處於可編輯狀態,把按鈕文字改變為「求和按鈕」。
7
選擇任意區域,如圖所示,單擊求和按鈕,現在彈出對話方塊「你選擇的區域資料之和為:328」.現在求和按鈕就製作好了。
相關文章