Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Spustite program Microsoft Excel a otvorte zošit .
2
Stlačením tlačidla " ALT + F8 " sa otvorí okno Makrá . Zadajte " ExportSheetsToCSV " do poľa Názov makra a potom kliknite na " Vytvoriť " .
3
Zadajte nasledujúci kód v editore VBA . Toto makro vytvorí súbory CSV v rovnakom priečinku ako zošit pomocou názvov hárkov pre názvy súborov .
Sub ExportSheetsToCSV ( )
Dim wSheet ako zošit
Dim csvFile As string
pre každú wSheet v listoch
On Error Resume Next
wSheet.Copy
csvFile = CurDir & " \\ " & wSheet.Name & " . csv "
ActiveWorkbook.SaveAs Meno súboru : = csvFile , _
FileFormat : = xlCSV , CreateBackup : = False
ActiveWorkbook.Saved = TRUE
ActiveWorkbook.Close
Ďalšie wSheet
End Sub
4
Zatvorte VBA upraviť vrátiť do svojho zošita .
5
Stlačením tlačidla " ALT + F8 " Opäť sa otvorí okno Makrá . Zvoľte " ExportSheetsToCSV " zo zoznamu a kliknite na tlačidlo " Run " . Počkajte Excel dokončiť konverziu listy .
Copyright © počítačové znalosti Všetky práva vyhradené