サンプルソースは次のとおり。
'文字のスタイルを変更する Sub Example() Range("A1").Font.Bold = True Range("A1").Font.Underline = xlUnderlineStyleSingle End Sub
サンプルソースは次のとおり。
'文字のスタイルを変更する Sub Example() Range("A1").Font.Bold = True Range("A1").Font.Underline = xlUnderlineStyleSingle End Sub
コメント