Sub AddressMasterChange() Dim strKenallCsvpath As String Dim strHeaderFilePath As String 'マスタメンテナンス画面よりCSVファイルパス取得 strKenallCsvpath = "C:\デスクトップ\郵便csv\KEN_ALL.CSV" '住所マスタの全レコード削除 Call CommandDelete…