web-dev-qa-db-ja.com

If ... Then ... Else、Thenの後の複数のステートメント

非常に簡単な質問:If...Then...Else VBAの命令、Thenの後に複数の命令を分離するにはどうすればよいですか?言い換えれば、私は

If condition [ Then ]    
   [ statement1 ] & [statement2] 
Else [Else statement] (i.e. using "&"),

または

If condition [ Then ]         
   [ statement1 ] And [statement2] 
Else [Else statement] (i.e. using "And"),

または他のセパレータ/コマンド?

12
Avitus

複数のステートメントは、改行で区切られます。

If SkyIsBlue Then
  StartEngines
  Pollute
ElseIf SkyIsRed Then
  StopAttack
  Vent
ElseIf SkyIsYellow Then
  If Sunset Then
    Sleep
  ElseIf Sunrise or IsMorning Then
    Smoke
    GetCoffee
  Else
    Error
  End If
Else
  Joke
  Laugh
End If
19
NGLN