execel vba中，如何定義全局變量，並在過程和函數中使用，能給出代碼示例嗎，謝謝

alt +F11打開vba

左邊窗口內新建壹個模塊，在其中寫入壹個全局變量

Public AAA As Integer

打開SHEET1，畫壹個按鈕，並為其寫入代碼：

Private Sub CommandButton1_Click()

bb

End Sub

Public Function bb()

AAA = 1

End Function

打開SHEET2，畫壹個按鈕，並為其寫入代碼：

Private Sub CommandButton1_Click()

AAA = 5

End Sub

打開SHEET3，畫壹個按鈕，並為其寫入代碼：

Private Sub CommandButton1_Click()

MsgBox AAA

End Sub

---------------

然後試驗AAA的值，

先點擊sheet3的按鈕，顯示AAA=0

點擊sheet1的按鈕後，再點擊sheet3的按鈕，顯示AAA=1

點擊sheet2的按鈕後，再點擊sheet3的按鈕，顯示AAA=5

--------------------

明白了嗎？