Использование инструкций With

Оператор With позволяет указать объект или определяемый пользователем тип один раз для целого ряда инструкций. Операторы 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

Операторы также могут быть вложенными. Следующий пример вставляет формулу в ячейку 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 и обратная связь.