Escrevendo instruções executáveis
Uma instrução executável inicia a ação. Ele pode executar um método ou função e pode fazer loop ou ramificação por meio de blocos de código. Instruções executáveis geralmente contêm operadores matemáticos ou condicionais.
O exemplo a seguir usa um Para Cada... Instrução next to iterate through each cell in a range named MyRange on Sheet1 of an active Microsoft Excel workbook. A variável c
é uma célula na coleção de células contidas em 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
O Se... Em seguida, ... A instrução Else no exemplo verifica o valor da célula. Se o valor for maior que 33, a instrução With define as propriedades Bold e Italic do objeto Font para essa célula. Se... Em seguida, ... As instruções Else terminam com End If. A instrução With pode salvar a digitação porque as instruções que ela contém são executadas automaticamente no objeto após a palavra-chave Com .
A instrução Next chama a próxima célula na coleção de células contidas em MyRange.
A função MsgBox (que exibe uma caixa de diálogo Visual Basic interno) exibe uma mensagem indicando que o procedimento Sub terminou de ser executado.
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.