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

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

В следующем примере используется параметр 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

Если... Тогда... Оператор Else в примере проверяет значение ячейки. Если значение больше 33, оператор With устанавливает параметры Bold (Полужирный) и Italic (Курсив) для объекта Font (Шрифт) этой ячейки. Операторы If...Then...Else заканчиваются оператором End If. Оператор With может сохранить типизацию, так как содержащиеся в ней инструкции автоматически выполняются для объекта, следующего за ключевым словом With .

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

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

См. также

• Операторы
• Темы по основам Visual Basic

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

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