VC用のコメントマクロと行削除マクロSub a() Dim startLine startLine = ActiveDocument.Selection.TopLine Dim endLine endLine = ActiveDocument.Selection.BottomLine do until startLine > endLine ActiveDocument.Selection.GoToLine StartLine ActiveD…