VBA next. Операторы и циклы.

Повторение - мать учения.
Операторы условного и безусловного перехода.
If... Then
Конструкция такая:
If Условие Then
Команды1
[ElseIf УсловиеN Then
КомандыN]
[Else
Команды2]
End If
При этом:
■ Условие — выражение, которое проверяется на истинность. Если оно истинно, то выполняются Команды1, если ложно — Команды2;
■ УсловияN — дополнительные условия, которые также можно проверить. В случае, если они выполняются (выражение УсловияN истинно), то выполняются КомандыN.

Select... Case
Select Case Выражение
Case Условие1
Команды1
[Case УсловиеN
КомандыN]
[Case Else
Команды2]
End Select

И оператор GoTo, безусловного перехода, метка.

Теперь о циклах. C предусловием:
For...Next:
For iCounter = 1 to 10
MsgBox "Счетчик: " & iCounter
Next

Если нужно пройтись по всем элементам:
For Each...Next:
For Each oWbk in Workbooks
MsgBox oWbk.Name
Next

С постусловием:
До тех пор, пока утвержденеи истинно:
Do While...Loop
Do While MyVar < 10 MyVar = MyVar + 1 MsgBox "MyVar = " & MyVar Loop До тех пор, пока утверждение ложно (не станет истинным): Do Until...Loop
Do Until MyVar >= 10
MyVar = MyVar + 1
MsgBox "MyVar = " & MyVar
Loop

While...Wend
While My Var < 10
MyVar = MyVar + 1
WScript.Echo "MyVar = " & MyVar
Wend