Sub CpySubColA() Dim selectedCell As Range Dim macroName As String Dim moduleName As String Dim codeLines As String Dim line As String Dim i As Long, j As Long Dim ws As Worksheet ' Set the active sheet Set ws = ActiveSheet ' Clear column A
スパイのメッセージ & MsgBox変換ツール 時間指定のメッセージボックス MsgBox変換は、ConvMsgBoxを実行です 使用方法は、YouTubeを見てください https://youtu.be/sg958y5kWyU Option Explicit 'vbInformation 情報メッセージのアイコンを表示 'デフォルトボタンの設定 'vbDefaultButton1 最初のボタンをデフォルトにする(デフォルト) 'vbDefaultButton2 2 番