excelマクロで任意のブック(.csv)を開き、作業後、この.csvファイルをxlsxファイルに変換して保存したいです。

Excel | Visual Basic65閲覧xmlns="http://www.w3.org/2000/svg">100

ベストアンサー

1

1人がナイス!しています

ThanksImg質問者からのお礼コメント

できました。ありがとうございました!

お礼日時:9/18 1:17

その他の回答(1件)

1

次のような方法でどうでしょうか。 Sub SaveSample() Dim FileName As Variant FileName = Application.GetSaveAsFilename(InitialFileName:="〇〇.xlsx", FileFilter:="Excelファイル,*.xlsx") If FileName = False Then Exit Sub End If Workbooks("○○.csv").SaveAs FileName End Sub

1人がナイス!しています