10/06/07 23:23:23
マクロに書いたコメント文だけを抜き出すにはどうすればいいでしょう？
Sub test()
Dim A As Long
'A列の最下行
A = Range("A65536").End(xlup).Row
'メッセージを出す
MsgBox "A=" & A
End Sub
これをSheet2に貼り付けて
A列の最下行
メッセージを出す
にする。（コメント前にあるスペースは残し、「'」は消す）
10/06/07 23:23:23
マクロに書いたコメント文だけを抜き出すにはどうすればいいでしょう？
Sub test()
Dim A As Long
'A列の最下行
A = Range("A65536").End(xlup).Row
'メッセージを出す
MsgBox "A=" & A
End Sub
これをSheet2に貼り付けて
A列の最下行
メッセージを出す
にする。（コメント前にあるスペースは残し、「'」は消す）