Como Usar While Vba Excel

Para usar o laço de repetição While em VBA Excel, siga os seguintes passos:

  1. Abra o Excel e vá para o Visual Basic Editor pressionando Alt + F11;

  2. Na janela do editor, insira um novo módulo (caso ainda não tenha) clicando em Inserir > Módulo;

  3. Insira o código abaixo para criar uma função que utiliza o While:

```vb Public Function CalcularSoma(ByVal valor As Integer) As IntegerDim i As IntegerDim soma As Integer

i = 1 soma = 0 While i <= valorsoma = soma + ii = i + 1 Wend CalcularSoma = soma 

End Function ```

Este código cria uma função chamada CalcularSoma que recebe um valor inteiro como parâmetro e utiliza o comando While para somar todos os valores inteiros de 1 até o valor passado como parâmetro. A função retorna a soma.

  1. Salve o módulo;

  2. Na planilha do Excel, insira a função na célula desejada, digitando =CalcularSoma(numero) e pressionando Enter, onde "numero" é o valor inteiro que deseja somar.

Pronto, agora você já sabe como usar o laço de repetição While em VBA Excel. É importante lembrar que o comando While é utilizado para executar uma ação enquanto uma condição for verdadeira. No exemplo acima, a função executa a ação de soma enquanto o valor de i for menor ou igual ao valor passado como parâmetro.

Veja também mais Como Fazer com a letra C

Comentários