VBA 自動でコードのインデントを揃えるマクロ

ネットのサンプルなどでは、まれに以下のようなインデントされていないコードがある。 Sub FizzBuzz() For i = 1 To 100 If i Mod 15 = 0 Then Debug.Print "FizzBuzz" ElseIf i Mod 3 = 0 Then Debug.Print "Fizz" ElseIf i Mod 5 = 0 Then Debug.Print "Buzz" Else Debug.Print i End If Next End Sub これはHTMLで単純…