Sub 左に寄せる_左詰め()

    Range("A1").HorizontalAlignment = xlLeft

End Sub