次のように記述してください。
editor.ExecuteCommandByID(4199); shell.SendKeys( "~" );
ただし、残念ながら、SendKeys メソッドは、マクロの途中で、現在実行中の EmEditor ウィンドウ自身あてには使用することができません。使用しようとすると、最後にまとめて実行されてしまいます。
SendKeys
ループの記述については、こちらで回答しています。
ループに関してただし、残念ながら、SendKeys メソッドは、別マクロの質問途中で、現在実行中の EmEditor ウィンドウ自身あてになるのでは使用することができません。使用しようとすると、別スレッドで仕様を詳しく書い最後にまとめて実行されていただけると幸いですしまいます。
ループに関しては、別の質問になるので、別スレッドで仕様を詳しく書いていただけると幸いです。