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 ramificar blocos de código. Instruções executáveis geralmente contêm operadores matemáticos ou condicionais.

O exemplo a seguir usa um formato For Each... Próxima instrução para iterar em cada célula em um intervalo chamado MyRange na Planilha1 de uma pasta de trabalho ativa do Microsoft Excel. A variável c é uma célula na coleção de células contida 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 campo Se... Então... A instrução Else no exemplo verifica o valor da célula. Se o valor for maior que 33, a instrução With definirá as propriedades Negrito e Itálico do objeto Font para essa célula. Se ... Então... 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 With.

A instrução Next chama a próxima célula na coleção de células contida em MyRange.

A função MsgBox (que exibe uma caixa de diálogo interna do Visual Basic) 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.

  • Last updated on