Top Ten Estruturas de Controle VBA Excel

Segue-se uma lista dos dez estruturas de controle de programação Excel VBA mais comumente usados. Incluído é um exemplo simples de cada estrutura de controle e uma breve descrição de quando você usaria essa estrutura.

Por - Next

Útil para loop através de uma matriz.

ArraySum = 0For i = 1 To 10ArraySum = ArraySum + MyArray (i) Next i

Para Cada - Next

Útil para loop através de uma coleção ou um intervalo de células.

SelectionSum = 0For cada célula SelectionselectionSum = SelectionSum + cell.ValueNext celular

Fazer - Loop Until

Loop até que uma condição seja atendida.

Row = 0DoRow = Row + 1Loop Até Cells (linha, 1) .Value = "" MsgBox "primeira célula vazia está em linha" Linha

Do While - o laço

Loop while a condição é verdadeira.

Row = 1DO enquanto as células (linha, 1) lt;> "" Row Row = + 1LoopMsgBox "célula vazia Primeiro está em Row" Linha

Se então

Fazer algo se uma condição é verdadeira. Escrito como uma única instrução.

Se x = 1 Em seguida, y = 1

Se - Então - End If

Fazer algo se uma condição é verdadeira. Pode usar várias instruções.

Se x = 1 Theny = 1Z = 1End Se

Se - Então - Else

Faça algo se uma condição é verdade- de outra forma, fazer outra coisa. Escrito como uma única instrução.

Se x = 1 Em seguida, y = 1 Else y = 0

Se - Então - Else - End If

Faça algo se uma condição é verdade- de outra forma, fazer outra coisa. Pode usar várias instruções.

Se x = 1 Theny = 1Z = 1Elsey = 0Z = 0End Se

Select Case

Faça uma das várias coisas, dependendo de uma condição.

Select Case Xcase 1a = 1Z = 1Case Is> 1a = 2Z = 2Case Elsey = 0Z = 0End Select

Vamos para

Ir para uma instrução rotulada. Isto é usado principalmente para o tratamento de erros.

On Error GoTo Ops '[mais código vai aqui] SubOops saída: MsgBox "Ocorreu um erro"