Sub 列の幅を自動調整する()

    Columns("A:B").AutoFit

End Sub