- ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：エクセルからＣＳＶファイルに出力したい？）
エクセルからCSVファイルに出力する方法
このQ&Aのポイント
- エクセルのシートからマクロを使ってCSVファイルに出力する方法を調べましたが、ファイル名がエクセルシートの名前になってしまう問題があります。
- 調査した結果、保存するCSVファイルの名前を常にabc.csvに設定することで解決できることが分かりました。
- 以下のコードを使用することで、CSVファイルをabc.csvという名前で保存することができます。 Sub Macro1() Dim myBook As String myBook = ActiveWorkbook.FullName myBook = Left(myBook, Len(myBook) - 3) & "CSV" ActiveSheet.Copy ActiveWorkbook.SaveAs Filename:="abc.csv", FileFormat:=xlCSV ActiveWindow.Close False End Sub
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
myBook = Left(myBook, Len(myBook) - 3) & "CSV" を myBook = Left(myBook, InStrRev(myBook, "\")) & "abc.csv と変更してください。 ソースコードを参照するのはいいですが、どんな処理をしているか、 理解すれば、応用もきくと思いますよ。 "
お礼
ご回答ありがとうございました。 思っていた事ができました。