İ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

Çox iş fayllarına birdən çox csv faylını birləşdirmək / idxal etmək necədir?

Bir kitabda birdən çox csv faylını ayrı bir iş kitabında bir qovluqdan idxal etmək istəyirsinizsə, Excel-də bu işlə necə məşğul ola bilərsiniz?

VBA kodu ilə ayrı-ayrı işlərdə birdən çox csv faylları idxal edin

Excel üçün Kutools ilə ayrı-ayrı işlərdə birdən çox csv faylları idxal edin

İş kitabını bir neçə csv / pdf / txt / excel fayllarına bölün


Bir iş kitabına birdən çox iş və ya csv faylını birləşdirin / idxal edin:

Gündəlik işinizdə bir çox iş və ya iş kitabını bir iş səhifəsinə və ya iş kitabına birləşdirmək böyük və başlıca bir iş ola bilər. Ancaq əgər varsa Excel üçün Kutools, güclü yardımı ilə - Birləşdirməktez bir çox iş kitabını, bir iş kitabçasına və ya iş kitabına birləşdirə bilərsiniz.

6 iş səhifəsinə doc import csv

Excel üçün Kutools: 200 gündə heç bir məhdudiyyət olmadan 60-dən çox lazımlı Excel eklentisi ilə pulsuzdur. İndi indir və pulsuz sınaq!



Çox csv faylları iş kitabına tez bir zamanda daxil etmək üçün aşağıdakı VBA kodu bir xeyir verə bilər, xahiş edirəm:

1. Basıb saxlayın ALT + F11 Excel açarları açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. Basın Taxmaq > Modules, və aşağıdakı kodu yapışdırın Modules Pəncərə.

VBA kodu: İş səhifələrini ayırmaq üçün birdən çox mətn faylını idxal et:

Sub CombineCsvFiles()
'updateby Extendoffice 20151015
    Dim xFilesToOpen As Variant
    Dim I As Integer
    Dim xWb As Workbook
    Dim xTempWb As Workbook
    Dim xDelimiter As String
    Dim xScreen As Boolean
    On Error GoTo ErrHandler
    xScreen = Application.ScreenUpdating
    Application.ScreenUpdating = False
    xDelimiter = "|"
    xFilesToOpen = Application.GetOpenFilename("Text Files (*.csv), *.csv", , "Kutools for Excel", , True)
    If TypeName(xFilesToOpen) = "Boolean" Then
        MsgBox "No files were selected", , "Kutools for Excel"
        GoTo ExitHandler
    End If
    I = 1
    Set xTempWb = Workbooks.Open(xFilesToOpen(I))
    xTempWb.Sheets(1).Copy
    Set xWb = Application.ActiveWorkbook
    xTempWb.Close False
    Do While I < UBound(xFilesToOpen)
        I = I + 1
        Set xTempWb = Workbooks.Open(xFilesToOpen(I))
        xTempWb.Sheets(1).Move , xWb.Sheets(xWb.Sheets.Count)
    Loop
ExitHandler:
    Application.ScreenUpdating = xScreen
    Set xWb = Nothing
    Set xTempWb = Nothing
    Exit Sub
ErrHandler:
    MsgBox Err.Description, , "Kutools for Excel"
    Resume ExitHandler
End Sub

3. Sonra basın F5 screenshot bax, əsas bu kodu icra etmək və pəncərə xüsusi qovluğunda gedin və Excel idxal etmək istədiyiniz csv faylları seçin həyata atdı edəcək:

1 iş səhifəsinə doc import csv

4. Və sonra basın açıq düyməsini seçdiyiniz csv faylları yeni bir iş kitabında ayrı-ayrı işlər kimi idxal olundu.

5. Nəhayət, yeni iş kitabını istədiyiniz kimi saxlaya bilərsiniz.


Əgər Excel üçün Kutoolsgüclü alət-Birləşdirmək, birdən çox CSV faylını bir iş səhifəsinə və ya birdən çox ayrılmış iş səhifəsinə ehtiyac olduqda tez birləşdirə və ya idxal edə bilərsiniz.

Quraşdırıldıqdan sonra Excel üçün Kutoolsxahiş edirəm:

1. Klikləyin Müəssisə > Birləşdirmək, bax ekran görüntüsü:

5 iş səhifəsinə doc import csv

2. Ci İşləri birləşdirin informasiya qutusu seçin Bir çox iş kitabını iş kitabından bir iş kitabına birləşdirin, bax ekran görüntüsü:

6 iş səhifəsinə doc import csv

3. İçində Step 2 sihirbazın klikləyin əlavə etmək > fayl birləşdirmək istədiyiniz csv fayllarını seçmək üçün ekran görüntüsünə baxın:

7 iş səhifəsinə doc import csv

4. Çölə atıldı açıq dialoq seçin (* .csv) açılan siyahıdan və sonra birləşdirmək istədiyiniz csv fayllarını qeyd edin.

8 iş səhifəsinə doc import csv

5. Sonra basın açıq düyməsini seçin və seçdiyiniz csv faylları informasiya qutusuna daxil edilir, ekran görüntüsünə baxın:

9 iş səhifəsinə doc import csv

6. İçində Step 3, aşağıdakı əməliyyatları edin:

(1.) Yoxlanılır Hər bir iş yerinin ilk satırı (şərh) dən İş məlumatı məlumatlarını daxil edin bölmədə bütün csv faylları məlumatları kombinə edilmiş səhifələrə şərh kimi daxil ediləcək;

(2.) Sizə lazım olan csv fayllarını yenidən adlandırmaq olar;

(3.) Boş bir csv faylını qarşılaşdığınızda boş csv faylları atlayabilirsiniz.

10 iş səhifəsinə doc import csv

7. Sonra basın finiş düyməsini basın və birləşməni bitirdikdən sonra yeni birləşmiş iş kitabınız üçün bir filf adı və yeri göstərə bilərsiniz. Ekran görüntüsünə baxın:

11 iş səhifəsinə doc import csv

8. Sonra basın Yadda saxla düyməsini, çıxardılan promt kutusundan yeni fayl klikini aça bilərsiniz bəlivə tıklayaraq onu bağlayın Yox, bax ekran görüntüsü:

12 iş səhifəsinə doc import csv

9. Və sonra bu ssenari saxlaya bilərsiniz və ya istədiyiniz kimi. Ekran görüntüsünə baxın:

13 iş səhifəsinə doc import csv

10. Nəhayət, seçdiyiniz csv faylları ayrılmış iş səhifəsi olan yeni bir iş kitabına daxil edilib, ekran görüntüsünə baxın:

14 iş səhifəsinə doc import csv

Excel İndi Download və pulsuz sınaq Kutools!


Excel üçün Kutools: 200 gündə heç bir məhdudiyyət olmadan 60-dən çox lazımlı Excel eklentisi ilə pulsuzdur. İndi indir və pulsuz sınaq!


Müəyyən halda, siz ayrı-ayrı csv faylları bir kitabı split edə bilərsiniz, Excel Split Kitabı kommunal üçün Kutools tez və asanlıqla bu işi bitirmək bilər.

Excel üçün Kutools : 300-dən daha çox 60-dən istifadə etməklə, Excel-in əlavələri, XNUMX gündə heç bir məhdudiyyət yox idi.

Quraşdırıldıqdan sonra Excel üçün Kutoolsxahiş edirəm:

1. Basın Müəssisə > İş kitabı > Split İş Kitabı, bax ekran görüntüsü:

2 iş səhifəsinə doc import csv

2. Ci Split İş Kitabı dialoq qutusu:

(1.) Ayrılmaq istədiyiniz iş yerlərini yoxlayın;

(2.) Və yoxlayın Saxla qeyd edinformatsonra saxlamaq istədiyiniz fayl formatını seçin;

(3.) Sonra basın Split düyməsini basın və ayrılmış faylları qoymaq üçün bir qovluq seçin.

3 iş səhifəsinə doc import csv

3. Və sonra basın OK bölmənin başlaması üçün, iş kitabı sizə lazım olan ayrı csv fayllarına bölünəcəkdir.

4 iş səhifəsinə doc import csv

Excel İndi Download və pulsuz sınaq Kutools!


Excel üçün Kutools: 200 gündə heç bir məhdudiyyət olmadan 60-dən çox lazımlı Excel eklentisi ilə pulsuzdur. İndi indir və pulsuz sınaq!



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.
  • To post as a guest, your comment is unpublished.
    Rohit · 1 days ago
    Thank you . Very handy
  • To post as a guest, your comment is unpublished.
    Amit · 11 days ago
    Thank you! The code was very useful
  • To post as a guest, your comment is unpublished.
    Andrew · 2 years ago
    Thank you for sharing this code. It is exactly what I was looking for.

    Sadly it is not working as well as I hoped it would.

    I am receiving an error message every time the code is run.
    ERROR: "The name is already taken. Try a different one."

    Notes:
    - I am trying to combine four csv files
    - All of the csv files have the same name "file_name.csv, file_name(1).csv, etc..."


    The code combines the first two csv files into one workbook and the the third file into its own workbook. The fourth file never had a chance because of the error.

    If anyone has some thoughts as how to go about fixing this issue I would greatly appreciate your feedback.

    Thank you all in advanced for you time.

    Best regards,
    Andrew
  • To post as a guest, your comment is unpublished.
    Mary · 2 years ago
    Thank you for the code on combining files.

    I however want to have the multiple files in the workbook I am currently working with, not for the code to create a new workbook.

    How do I go about achieving that?