Sub フォントを斜体_イタリック形式_設定する()

    Range("A1").Font.Italic = True

End Sub