撰寫可執行的語句

可執行的 語句 會起始動作。 它可以執行 方法 或函式，而且可以迴圈或分支程式代碼區塊。 可執行的語句通常包含數學或條件運算元。

下列範例使用 For Each...下 一個語句，用來逐一查看使用中Microsoft Excel 活頁簿 Sheet1 上 MyRange 範圍中的每個單元格。 c變數是 MyRange 中所包含儲存格集合中的儲存格。

Sub ApplyFormat() 
    Const limit As Integer = 33 
    For Each c In Worksheets("Sheet1").Range("MyRange").Cells 
        If c.Value > limit Then 
            With c.Font 
                .Bold = True 
                .Italic = True 
            End With 
        End If 
    Next c 
    MsgBox "All done!" 
End Sub

If...然後。。。範例中的Else語句會檢查儲存格的值。 如果值大於 33，With 語句會設定該儲存格之 Font 物件的 Bold 和 Italic 屬性。 如果。。。然後。。。Else 語句以 End If 結尾。 With 語句可以儲存輸入，因為它包含的語句會自動在With關鍵詞後面的物件上執行。

Next 語句會呼叫 MyRange 中所包含儲存格集合中的下一個儲存格。

MsgBox 函式 (會顯示內建的 Visual Basic 對話框) 會顯示訊息，指出 Sub 程式已完成執行。

另請參閱

• 陳述式
• Visual Basic 概念主題

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。