使用With語句

發行項
08/01/2024

With 語句可讓您針對整個一系列的語句指定對象或使用者定義型別一次。 使用語 句可讓您的程序執行得更快，並協助您避免重複的輸入。

下列範例會以數位 30 填滿儲存格範圍、套用粗體格式設定，並將儲存格的內部色彩設定為黃色。

Sub FormatRange() 
    With Worksheets("Sheet1").Range("A1:C10") 
        .Value = 30 
        .Font.Bold = True 
        .Interior.Color = RGB(255, 255, 0) 
    End With 
End Sub

With 語 句也可以是巢狀的。下列範例會將公式插入儲存格 A1，然後格式化字型。

Sub MyInput() 
    With Workbooks("Book1").Worksheets("Sheet1").Cells(1, 1) 
        .Formula = "=SQRT(50)" 
        With .Font 
            .Name = "Arial" 
            .Bold = True 
            .Size = 8 
        End With 
    End With 
End Sub

另請參閱

Visual Basic 概念主題

支援和意見反應

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