エクセルマクロVBA サンプルコード辞書
トップページ（目次）497.フォントに二重下線を引く_二重アンダーライン_設定する
＜実行前後＞
→
Sub フォントに二重下線を引く_二重アンダーライン_設定する()
Range("A1").Font.Underline = xlUnderlineStyleDouble
End SubSub フォントに二重下線を引く_二重アンダーライン_設定する()
Range("A1").Font.Underline = xlUnderlineStyleDouble
End Sub