【マクロ】EXCELで読込したCSVファイルは通常のエクセル(xlsx)と同じようにマクロで動かせる

【やりたい事】
CSVファイルをエクセルにて読込、通常のエクセルファイルと同じように
マクロを利用し、CSVファイルを加工はできますか？？？
※実験では出来ました

例：A.CSVをB.xlsmから、マクロにて指示をし加工したい
⇒以下コードで、CSVファイルの中のデータコピー、オートフィルターの設置、文字入力
⇒実施しましたが、普通のエクセルファイルと同じように加工できました


【条件】
WEB上から出力されたCSVファイル
開始行の１行目が約１０項目あり
２行目からがデータとなる

【ためしたコード】
Sub csvファイルをエクセルで読み込んだアクティブブック()


Dim filepath1 As String
Dim wb1 As Workbook
Dim ws1 As Worksheet


filepath1 = ActiveWorkbook.FullName
sheetname1 = ActiveSheet.Name


Set wb1 = Workbooks.Open(filepath1)
Set ws1 = wb1.Worksheets(sheetname1)



MsgBox ActiveWorkbook.FullName

ws1.Activate

Range("a20") = "あいうえお"

Range("A1:h1").Copy

Range("a10").PasteSpecial Paste:=xlPasteValues

Range("A1").AutoFilter

End Sub

No.1 回答者： PowerCheck 回答日時： 2025/04/19 07:32

できますか？→出来ました

自己解決してるじゃないですか。できますよ。

この回答へのお礼

PowerCheck　様
お返事ありがとうございます
確かに、自己解決はしているのですが

今後、エクセル（xlsx）と同じようにいろんな、操作を
していくので、何か落ち度がないか、質問しました

回答ありがとうございます

お礼日時：2025/04/19 08:11