Share via

Написание исполняемых инструкций

  • Статья

Выполняемый оператор инициирует действие. Он может выполнять метод или функцию, а также целые блоки кода. Выполняемые операторы обычно содержат математические или условные операторы.

В следующем примере используется параметр For Each... Следующая инструкция для итерации по каждой ячейке в диапазоне с именем MyRange на листе 1 активной книги Microsoft Excel. Переменная 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...Then...Else, используемый в примере, проверяет значение ячейки. Если значение больше 33, оператор With устанавливает параметры Bold (Полужирный) и Italic (Курсив) для объекта Font (Шрифт) этой ячейки. Операторы If...Then...Else заканчиваются оператором End If. Оператор With может упростить набор, так как содержащиеся в нем операторы автоматически применяются к объекту, который следует за ключевым словом With.

Оператор Next выполняет переход к следующей ячейке коллекции в диапазоне MyRange.

Функция MsgBox (отображаемая во встроенном диалоговом окне Visual Basic) показывает уведомление о завершении выполнения процедуры Sub.

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.