sub main()
if cells(1,"A").value="中國" then cells(1,"B")="111"
if cells(1,"A").value="美國" then cells(1,"B")="1123"
end sub
以此為例，在Excel中調用VBA程序的操作步驟如下（Excel2007為例）：
1.選擇”開發工具“選項卡，點擊”Visual Basic“（或者用快捷鍵Alt+F11）
2.出現VBA編輯界面，註意看左側，選擇需要運行代碼的工作表，此例為Sheet1；雙擊進入Sheet1相關程序編輯界面
3.在程序編輯區域，復制上上述代碼
4.點擊上面的三角號，運行程序
5.關閉VBA界面，返回工作表，就可以看到程序運行結果，如下圖：
6.如果再次運行程序，可以用快捷鍵Alt+F8（或者步驟1中的”宏“），出現如下圖界面，選擇要運行的宏，點擊執行即可。