前提条件 マクロ実行ブックが格納されているフォルダの、ファイルを全て取得 注意事項 フォルダ内からファイルを取得するDir関数があるが、Dir関数は入れ子になる（Dir関数実行中に、内部で別のフォルダでDir関数を実行する）と戻り値が被るのであまり使用し…

複数の置換を一度に処理する 前提条件 A列のデータを、C、D列のデータ通りに置換する（共に実データは2行目から） A列、C,D列共に、行数に制限はないものとする 仕様 列は固定だが、定数としてソース上で定義する C,D列の語句一つ一つを、Range.Replaceを使…

読み込む、または保存などで、任意のフォルダを指定する 前提条件 Dialogを表示し、フォルダを指定する Dialog上でキャンセルボタンを押下した場合は、処理を行わない 初期表示DialogはActiveWorkBookのフォルダか否か選べる 仕様 初期表示Dialogに指定する…

Excelファイルをcsvデータとして保存する 前提条件 現在開いているExcelファイル、シートが対象 同フォルダに保存 Excelファイルとcsvデータのファイル名は同一（拡張子のみ異なる） 問題点 csvに保存した瞬間、開いていたExcelファイルがcsvファイルにすり…

AccessのデータをExcelに貼り付ける際、 ↓ 貼り付け ↓ このままでは見栄えが悪いので、以下の処理を行う ①セルの書式設定で「折り返して全体を表示する」のチェックを外す ②列幅を自動調整 この①、②を実行する関数 Sub AccessToExcelFormat() '「折り返して…

'------------------------------------------------------'セルの書式設定を書き出し'' 戻値：なし'' 引数：コピー元セル（範囲指定は不可）' ：コピー先セル（範囲指定可）'' 注意：コピー元セルが複数指定されている場合エラーとする'-------------------…

'------------------------------------------------------'セルの書式設定をコピー'' 戻値：なし'' 引数：コピー元セル（範囲指定は不可）' ：コピー先セル（範囲指定可）'' 注意：コピー元セルが複数指定されている場合エラーとする'---------------------…

'------------------------------------------------------'表内最大列を取得'' 戻値：表内最大列'' 引数：対象ワークシート' ：カウント基準となる行（省略時：1（1行目））'' 注意：オートフィルター、非表示は解除してから行うこと'---------------------…

'------------------------------------------------------'表内最終行を取得'' 戻値：表内最終行'' 引数：対象ワークシート' ：カウント基準となる列（省略時：1（A列））'' 注意：オートフィルター、非表示は解除してから行うこと'-----------------------…