İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Toplu Excel'de CSV fayllarına birdən çox Excel faylını necə çevirə bilər?

Excel-də iş kitabını CSV faylı olaraq Saxla funksiyası ilə çevirə bilərik, ancaq CSV fayllarını ayrı-ayrılıqda birləşdirmək üçün birdən çox Excel faylını necə toplaya bilə bilə bilərsiniz? Bu yazıda, toplu bir VBA kodunu bütün Excel fayllarını bir qovluqda Excel-də CSV fayllarına çevirə bilərəm.

Batch VBA ilə CSV fayllarına bir qovluqun Excel fayllarını çevirir

Excel üçün Kutools ilə ayrı-ayrı CSV fayllarına iş kitabının vərəqələrini dəyişdirinyaxşı fikir3

Sekmeli tarama ve birden çox Excel iş kitabını / Word sənədlərini Firefox, Chrome, İnternet olaraq redaktə edin 10 araşdırın!

Firefox / Chrome / IE-də birdən çox veb səhifəni keçirmək üçün tanış ola bilərsiniz və asanlıqla müvafiq sekmeleri asanlıqla tıklayaraq onların arasında keçid edə bilərsiniz. Office Tab, bir Excel iş kitabını və ya Word sənədlərini bir Excel pəncərəsində və ya Word pencerəsində gözdən keçirmək və onların sekmelerini tıklayarak asanlıqla keçmək üçün imkan verən oxşar emal dəstəkləyir. Office Tab-ın 45-gün sınaq üçün basın!

ot excel

Batch VBA ilə CSV fayllarına bir qovluqun Excel fayllarını çevirir

Excel-də VBA xaricində heç bir daxili funksiya bu işi tez həll edə bilər.

1. Excel'i aktivləşdirin və basın Alt + F11 düymələri açıqdır Proqramlar üçün Microsoft Visual Basic pəncərə.

2. klik Taxmaq > Modules yeni bir modul yaratmaq.

3. Koddan kopyala və yeni Modul pəncərəsinə yapışdırın.

VBA: Batch, Excel fayllarını CSV-ə çevirir

Sub Workbooks SaveAsCsvToFolder () 'UpdatebyExtendoffice20181031 Dim xObjWB iş kitabı kimi Dim xObjWS iş xətti kimi Dim xStrEFPath xətt kimi Dim xStrEFFile Dim xObjFD kimi FileDialog Dim xObjSFD kimi FileDialog Dim xStrSPath kimi dize Dim xStrCSVFName String Application.ScreenUpdating = False Application.EnableEvents = Yanlış Application. Hesablama = xlCalculationManual Xəttin üzərindəki xəttin davamı xObjFD = Application.FileDialog (msoFileDialogFolderPicker) xObjFD.AllowMultiSelect = False xObjFD.Title = "Excel üçün Kutools - Excel faylları olan bir qovluq seçin" xObjFD.Show <> -1 Sonra Exit Sub xStrEFPath xObjSFD = Application.FileDialog (msoFileDialogFolderPicker) xObjSFD.AllowMultiSelect = False xObjSFD.Title = "Excel üçün Kutools - CSV faylları tapmaq üçün qovluq seçin" xObjSFD.Show <> -1 XStrEFFile = xStrEFFath = "XStrEFFail" və "* .xls *" xStrEFFile <> "" XObjWB = Çalışma kitabını qurun xStrPath = xObjSFD.SelectedItems (1) & "\" xStrEFFile = (Fayl adı: xStrEFPath & xStrEFFile) xStrCSVFName = xStrSPath & Sol (xStrEFFile, InStr (1, xStrEFFile, ".") - 1) & ".csv" xObjWB.SaveAs Filename: = xStrCSVFName, FileFormat: = xlCSV xObjWB Savechangchang: = Yanlış xStrEFFile = Dir Loop Application.Calculation = xlCalculationAutomatic Application.EnableEvents = True Application.ScreenUpdating = True End Sub

4. Basın F5 düyməsini seçin, qovluğun ilk açılış dialoqunda CSV fayllarına çevirmək istədiyiniz Excel fayllarını seçin.
csv 1 doc batch

5. klik OK, sonra ikinci açılan informasiya qutusunda, CSV faylları yerləşdirmək üçün qovluğu seçin.
csv 2 doc batch

6. klik OK, indi qovluqdakı Excel faylları CSV fayllarına çevrilmiş və başqa qovluqda saxlanılmışdır.
csv 3 doc batch


Excel üçün Kutools ilə ayrı-ayrı CSV fayllarına iş kitabının vərəqələrini dəyişdirin

Bilindiyi kimi, biz bütün iş kitabını yalnız Excel-də bir CSV faylı olaraq Saxla funksiyası ilə çevirə bilərik. Ancaq bəzi zamanlarda vahid səhifəni CSV faylına çevirmək istəyirsən, bu halda Split İş Kitabı faydası Excel üçün Kutools sizə kömək edə bilər.

Excel üçün Kutools, daha çox 200 lazımlı funksiyaları, işinizi asanlaşdırır.

Quraşdırıldıqdan sonra Excel üçün Kutools, aşağıdakıları edin:(Excel İndi Pulsuz İndir Kutools!)

1. Çaplarını ayrı CSV faylları olaraq çevirmək istədiyiniz iş kitabını aktivləşdirin, klikləyin Kutools Plus > İş kitabı > Split İş Kitabı.
csv 4 doc batch

2. İçində Split İş Kitabı dialoq, bölmək istədiyiniz hesabatın adını yoxlayın (bütün vərəqlər default olaraq yoxlanılır), yoxlayın Kimi saxla növü, seçin CSV (Macintosh) (* .CSV) açılan siyahıdan.
csv 5 doc batch

3. klik Split a Qovluq üçün göz atın dialoq, CSV faylları yerləşdirmək üçün bir qovluq seçin və ya yaradın.
csv 6 doc batch

4. klik OK, indi iş kitabı ayrı CSV faylları kimi bölünmüşdür.
csv 7 doc batch



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.