Part03 - VBA 學習第二回 - 對 VBA 的基本認識 ( 繁體 )

~ 上傳‧分享‧網賺 ~

~ 免費上傳空間‧請即申請 Freak Share ~

~ 進入後請點選左上角 注冊 ! ~

~ 聲明事項 ~

如各位想把以下本文章轉貼 , 請記得要注明出處.

本文章之內容為本人之經驗所寫, 絕無抄襲成份, 特此聲明.

由於圖片製作需時, 所以更新會比較慢.

存放圖片的 SHARE A PIC SERVER 可能讀取速度較慢, 請耐心等待.

首先 , 我們來看一下編寫 VBA 程式時所使用的介面 .


( Pic3_1 )

這個就是我們將會經常使用的介面了 , 右手面的是程式編寫時會用到的 , 左上角的是專案 , 專案的位置我們可以看到這個 EXCEL 檔內的三個不同頁面 ( WORKSHEETS - SHEET1 , 2 及 3 ) .

如果我們用滑鼠指著 MICROSOFT EXCEL 物件點擊滑鼠右鍵 , 會發現又一個選單跳出來了 , 而我們最常用到的就是 " 插入 -> 自訂表單 " 和 " 插入 -> 模組 " 兩個 .


( Pic3_2 )

自定表單就是建造使用者介面的功能 , 模組就是存放大量巨集的地方 .

左下方的屬性窗格現在用途不大 , 這裡面的功能稍後再作介紹 , 現在就開始你們自己的第一個自行編寫的程式吧 , 準備好就來了哦 ~

首先打開一個新的 EXCEL 檔案 , 然後打開 Visual Basic 編輯器


( Pic3_3 )

現在 , 這個新的 EXCEL 檔中的三個頁面都是沒有數據的 , 我們要利用 VBA 的程式碼來幫它增加數據 . 在編寫程式的位置打上

Sub abc()

Worksheets("Sheet1").Range("A1").Value = "100"

End Sub

現在按一下執行按鈕 .

看到嗎 ?? Sheet1 中的儲存格 A1 的值被修改成 100 了 ~ 呵呵 ~ 感動嗎 ??

現在來解釋一下這三行東西是怎樣的一回事吧 ~


( Pic3_4 )

Sub abc() 和 End Sub 是告訴電腦那裡是開始和結束 , abc 只是一個名字 , 就正如你自己的名字 , 你可以把它改成 cde 或者是 asdf , 只要你喜歡就可以了 ( 只限初學階段 , 到了後期你要編寫大型或者很多個巨集同時執行的程式時 , 最好就是把 名稱 定義為一個一定看得懂而且跟程式有關係的名字 )

而中間的 Worksheets("Sheet1").Range("A1").Value = "100" 就是我們要電腦幫我們處理的東西 .

Worksheets("Sheet1") 是告訴你的電腦 , 你現在要的是這個 EXCEL 檔案中的 Sheet1 , 然後 Range("A1") 就是指 Sheet1 中的儲存格 A1 , value = "100" 就是指你想要的值 .

中間的一點 , 你可以把它當作中文字 " 的 " , 如果把這一個程式碼改成我們的文字 , 那麼你可以用以下的方式去理解 :

開始 程序abc

本工作表第一頁 [ Worksheets("Sheet1") ] " 的 " 儲存格 A1 [ Range("A1") ] " 的 " 值等於 100 [ Value = "100" ]

結束 程序abc

開始清晰點了嗎 ?? 很簡單吧 ~ 都說了 , 要學這個並不困難的 ~ :)