Excel #M033 ≪全シートをシート別にCSVファイルとして出力《FileSystemObject》≫Macro 全シートをシート別に CSV ファイルとして出力 《FileSystemObject》 (Excel97,Excel2000,Excel2002) ≪準備≫ 右のような Excel Book があります。 これらのシートを順番に、 csv ファイルとして出力します。 シート名はそのままファイル名として 使用します。 データは、A1 セルから始まり、途中に空白の行や列が入らないことが条件です。 出力用の、「C:\Test」 フォルダを予め作っておいてください。 中にあるシート名と同名の CSV ファイルは無条件で上書きされます。 必要なファイルは退避しておいてください。 以下のコードを標準モジュールに貼り付けてください。 Sub CreateTxtDataS() '全シートを1シート毎にカンマ区切りcsvファイルとして出力する 'シート名はファイル名として使用
