流程控制与回圈-周国华老师会计教学网站.PDFVIP

VBA 講義 6-1 第六講 流程控制與迴圈 If … Then 語法： If 條件敘述 Then 程式敘述 ……. End If 涵義：當「條件敘述」成立，則執行If 與 End If 間的程式敘述，並於執行完後 繼續執行End If 之後的敘述 ；若 「條件敘述」不成立 ，則略過這些程式敘述，直 接執行End If 後面的程式敘述。 If … Then … Else 語法： If 條件敘述一 Then 程式敘述一 ……. Else 程式敘述二 ……. End If 涵義：當「條件敘述一」成立，則執行If 與 Else 間的程式敘述一，並於執行完 後繼續執行End If 之後的敘述 ；若 「條件敘述一」不成立 ，則略過程式敘述一， 直接執行程式敘述二，並於執行完後繼續執行End If 後面的程式敘述。本流程設 計至少會執行「程式敘述一」或「程式敘述二」中的一種。 If … Then … ElseIf …Else 語法： If 條件敘述一 Then 程式敘述一 ……. ElseIf 條件敘述二 Then 程式敘述二 ……. [ElseIf 條件敘述n-1 Then 程式敘述n-1 …….] [Else 程式敘述n …….] End If 國立屏東商業技術學院 會計系 周國華老師 編撰 VBA 講義 6-2 涵義 ：當 「條件敘述一」成立 ，則執行程式敘述一，並於執行完後繼續執行End If 之後的敘述 ；若 「條件敘述一」不成立 ，則略過程式敘述一，並判斷 「條件敘 述二」是否成立 ，若成立則執行程式敘述二 ，並於執行完後繼續執行End If 後面 的程式敘述，依此類推。在流程設計中若有[Else….]的部分，則本流程設計至少 會執行「程式敘述一」到「程式敘述n 」中的一種。若沒有[Else….]的部分，且 在[Else….]之前的各個ElseIf 後的條件敘述均不成立，則本流程設計中的程式敘 述都不會被執行，直接跳至End If 後的敘述。 Select Case 語法： Select Case 變數 Case 變數值 [to 變數值] 程式敘述一 ……. Case 變數值 [to 變數值] 程式敘述二 ……. [Case 變數值 [to 變數值] 程式敘述n-1 …….] [Case Else 程式敘述n …….] End Select 涵義 ：Select Case 敘述 ，必須指定一個變數做為選擇的指標，程式會依據變數的 內容做為判斷的標準，如果某特定 「Case 」後的變數值與變數內容相同，就執行 該Case 程式區塊的程式敘述 。變數的內容可以是數字或字串 ，也可以在 「Case 」 敘述中使用 「to 」指定變數值範圍，當變數內容在某個範圍值內時，就執行特定 的程式敘述。在流程設計中若有[Case Else….]的部分，則本流程設計至少會執行 「程式敘述一」到「程式敘述n 」中的一種。若沒有[Case Else….]的部分，且變 數內容均未落在[Case Else….]之前的各個Case 後的變數值範圍內，則本流程設 計中的程式敘述都不會被執行，直接跳至End Select 後的敘述。 Do While… Loop 語法： Do While 條件敘述 程式敘述 …….