Аналог continue в VBA

[omegastripes]

Сообщение от motorway

...
For Each form In formula
...
frm=... 
' формула
    If (Trim(frm) = "") Then  здесь что-то должно быть
' если формула пустая, то перейти к анализу следующей
Range(...).Formula=frm;
...

В цикле формуле что-то присваивается. Если она пустая, то нужно перейти к следующей, если нет - написать в ячейку такую-то эту формулу. Код примерный

Прервать выполнение блока кода можно, заключив его в Do...Loop:

For Each form In formula
	...
	Do
		frm = ... 
		' формула
		If (Trim(frm) = "") Then Exit Do ' если формула пустая, то перейти к анализу следующей
		...
		Range(...).Formula=frm;
		...
	Loop Until True
Next