Obsah
V aplikaci Microsoft Excel můžete snadno převést dokument na CSV výběrem vhodného typu souboru v dialogovém okně "Uložit jako". Prostřednictvím této metody bude převeden pouze aktivní list. Důvodem je, že soubory CSV mohou obsahovat pouze jeden list. Chcete-li převést více tabulek CSV, musíte je exportovat jeden po druhém a to znamená aktivaci každého z nich, přesunutí do prázdného dokumentu a jeho uložení jako CSV. Aby byl tento úkol snazší a pohodlnější, použijte makra.
Pokyny
Převedení tabulky na CSV bude trvat vaše vzorce a styly (Stockbyte / Stockbyte / Getty Images)-
Spusťte aplikaci Microsoft Excel a otevřete dokument.
-
Stiskněte "Alt + F8" pro otevření okna Makra. Zadejte "ExportSheetsToCSV" v možnost název makra a klepněte na tlačítko "Vytvořit."
-
Zadejte následující kód v editoru VBA. Toto makro vytvoří soubory CSV ve stejné složce jako dokument pomocí názvu listů pro soubory.
Sub ExportSheetsToCSV ()
Dim wSheet jako pracovní list Dim csvFile jako řetězec
Pro každý wSheet v pracovních listech On Error Resume Další wSheet.Copy csvFile = CurDir & "" & wSheet.Name & ".csv" ActiveWorkbook.SaveAs Název souboru: = csvFile, _ FileFormat: = xlCSV, CreateBackup: = False ActiveWorkbook.Saved = True ActiveWorkbook.Close Další wSheet
End Sub
-
Zavřete editor VBA a vraťte se do dokumentu.
-
Opětovným stisknutím tlačítka "Alt + F8" otevřete okno Makra. Vyberte "ExportSheetsToCSV" ze seznamu a klepněte na tlačítko "Spustit". Počkejte, až Excel dokončí konverzi tabulek.
Jak
- Pokud chcete soubory CSV uložit do jiné složky, nahraďte "CurDir" na řádku 9 cestou ke složce podle vašich preferencí. Před spuštěním makra můžete dokument také přesunout do složky podle svého výběru.
Oznámení
- Ve výchozím nastavení jsou makra v aplikaci Microsoft Excel zakázána. Chcete-li je aktivovat, klepněte na tlačítko "Microsoft Office", přejděte na "Možnosti aplikace Excel" a potom zkontrolujte, zda je zaškrtnuta možnost "Zobrazit kartu vývojáře v možnostech". V některých případech budete muset restartovat aplikaci Excel, aby se změny projevily.