質問: 複数のシートを含むexcelファイルを一連のcsvファイルに変換する方法 20枚のexcelファイルがあります。シートごとに1つずつ、20個のcsvファイルにすばやく変換する方法はありますか?私はもちろん手動でそれを行うことができますが、私はこれらのファイルをたくさん処理しなければならないので、ある種のコマンドラインユーティリティ(あるいはexcelコマンドラインスイッチさえ)を持つことは素晴らしいことです。
回答: documentsフォルダにタブを保存する extendoffice からのマクロ:sub exportsheetstocsv() dim xws as worksheet dim xcsvfile as string for each xws in application.activeworkbook.worksheets xws.copy xcsvfile = curdir & "\" & xws.name & ".csv" application.activeworkbook.saveas filename: = xcsvfile, _ fileformat: = xlcsv, createbackup: = false application.activeworkbook.saved = true application.activeworkbook.close next end sub