'####################################### '方眼フォーマット 項目範囲取得 '####################################### Sub GetFieldArea() On Error GoTo Catch Dim i As Integer Dim j As Integer Dim rng As Range Dim strMergeArea As String Dim CN As…

'####################################### '正規表現置換 '【概要】 ' 正規表現で文字列置換する '【参照設定】 ' Microsoft VBScript Regular Expressions 5.5 '【引数】 ' 対象文字列 ：変更前文字列 ' パターン ：検索条件 ' 置き換え文字列 ：置き換え…