Cara membagi satu lembar excel menjadi beberapa file menggunakan makro

Berikut adalah file Excel yang dapat digunakan untuk membagi satu file Excel menjadi beberapa file Excel berdasarkan jumlah baris terpisah. Yang harus Anda lakukan adalah menelusuri buku kerja sumber (mis. e. yang memiliki 1.00.000 baris), pilih nama sheet dan berikan jumlah pemisahan khusus (mis. e. 500, 1000. )

Dengan menggunakan VBA, Anda dapat memecah lembar kerja sumber menjadi beberapa file Excel berdasarkan nilai di kolom kunci yang dipilih, dan dengan melakukannya, data Anda akan tetap aman tanpa berbagi informasi yang tidak diinginkan secara berlebihan. Banyak solusi di luar sana mengandalkan addin pihak ke-3, memerlukan pembayaran untuk mengunduh perangkat lunak. Dengan VBA, ini gratis, dan Anda dapat memodifikasi skrip untuk memenuhi kebutuhan spesifik Anda


Belikan Saya Kopi?
PayPal Saya. https. // www. paypal. saya/jiejenn/5
Venmo. @ Jie-Jenn





Unduh file sumber → LINK

Unduh file terakhir → LINK


Kode Sumber (Diperbarui 30/12/2021)


39 Komentar
  1. Dan pada 09-06-2020 jam 12. 50 pagi

    Hi Jie,

    Saya ingin tahu betapa sulitnya membuat ulang latihan yang sama ini tetapi dengan tambahan 7 kolom dan menetapkannya ke folder milik (nama yang sama, diatur dengan hierarki yang sama)

    Terbaik,

  2. Tisa Jones pada 25-08-2020 jam 1. 52 pagi

    Penyelamat. terima kasih

    • jiejenn pada 24-08-2020 jam 10. 13.00

      Senang naskah saya membantu

  3. Agata pada 07-10-2020 jam 7. 13.00

    Itu bagus dan menghemat banyak jam kerja manual

    Saya punya dua pertanyaan
    1. Dengan asumsi ada beberapa spreadsheet dalam file yang saya gunakan, dapatkah kode dimodifikasi untuk menyimpan file baru berdasarkan nilai kolom dalam satu lembar (seperti sekarang) tetapi juga menyimpan semua spreadsheet lain yang tidak berubah dalam file baru?

    2. Cara memodifikasi kode untuk membagi berdasarkan nilai dalam kolom tetapi juga menyalin semua baris di bawah tabel tidak berubah ke file baru

    Selamat menikmati kopi 🙂

    • jiejenn pada 07-10-2020 jam 4. 37 pagi

      Hai Agata, bisakah Anda mengirimi saya email ke YouTube@LearnDataAnalysis. org dengan pertanyaan Anda beserta file sampel menggambarkan masalahnya?

  4. Oliver Howton pada 31-10-2020 pukul 10. 25 pagi

    Ini Aku Hebat. Bagaimana cara menyesuaikan untuk menyimpannya sebagai File CSV?

    • Darlia A pada 17-12-2020 jam 9. 38 pagi

      Saya mengikuti tutorial dan dia masuk di “. xlsx” di bagian jadi mungkin ctrl + f dan ganti sebagai jenis file yang berbeda?

  5. PW Soh pada 28-12-2020 jam 5. 30 sore

    Hai

    Saya menyalin skrip dan menjalankannya tetapi kesalahan runtime “1004. Metode Clearcontents dari kelas Range gagal. Mengapa demikian dan bagaimana cara mengatasinya?

    Saya menyalin skrip ke file saya, tidak mengunduh file sumber

    • jiejenn pada 28-12-2020 pukul 1. 45 pagi

      “Hapus Konten”. C kedua dikapitalisasi

  6. J Stauder pada 10-02-2021 jam 7. 50 sore

    Sepertinya saya dapat menjalankan kode, dan file pembantu mencantumkan kategori yang saya harapkan. Namun, tidak ada file yang dibuat di folder keluaran saya. Ada saran? . Terima kasih sebelumnya

    • jiejenn pada 11-02-2021 jam 4. 45 pagi

      Apakah file Anda disimpan di One Drive?

      • K Foley pada 02-04-2022 jam 4. 48 pagi

        Halo Jie Jenn, saya mengalami masalah yang sama. File saya tidak disimpan di One Drive

  7. Geraint Davies pada 18-02-2021 jam 3. 48 pagi

    Ini sangat bagus dan sangat jelas untuk pemula seperti saya
    Pertanyaan singkat, JIKA kami ingin mempertahankan panjang kolom lembar kerja untuk lembar kerja yang dibuat, apa yang perlu saya tambahkan ke Makro?

    terima kasih

    • jiejenn pada 20-02-2021 jam 5. 13 pagi

      Bisakah Anda lebih spesifik?

  8. DJ pada 01-04-2021 jam 8. 43 pagi

    Hi Jie,

    Ini terlihat bagus. Saya sudah mencoba menjalankan tetapi file keluaran berisi semua data sumber daripada data yang difilter berdasarkan kategori yang dihasilkan di lembar bantuan. Ada ide apa yang saya lakukan salah?

    Terima kasih sebelumnya

    • Jack pada 29-04-2021 jam 5. 30 sore

      Punya masalah yang sama, saya menghapus semua pemformatan dari lembaran dan mengatur output ke drive lokal, bukan onedrive, berfungsi dengan baik setelah itu. semoga membantu

  9. Selamat pada 18-04-2021 pukul 10. 11 malam

    Hi Jie,

    Kode ini sangat membantu, dapatkah Anda menasihati saya bagaimana saya bisa menempelkan format pelukis ke lembar kerja baru juga?

    Pertanyaan kedua saya, jika saya memiliki buku kerja dengan 3 lembar kerja. Setiap lembar kerja memiliki kolom cabang
    Saya perlu memecah buku kerja menjadi beberapa buku kerja (setiap buku kerja dengan 3 lembar kerja) di cabang tertentu

  10. Andy Hydes pada 21-04-2021 jam 9. 13.00

    Sangat membuat frustrasi- Saya menonton tutorial dan menulis kode VBA, memeriksa kesalahan dan semuanya baik-baik saja, tetapi itu tidak akan membuat file individual 😦 Saya telah memeriksa referensi dan tidak dapat melihat masalah apa pun

    Memiliki lebih dari 330 file terpisah untuk dibuat jadi ini akan menghemat waktu tetapi harus memilahnya secara manual sekarang

  11. sos pada 27-04-2021 jam 6. 54 sore

    Hi Jie,

    terima kasih pertama untuk video dan kode. Saya sudah menjalankannya dan menghasilkan file tetapi file keluarannya kosong. Ada ide kenapa?

    Terima kasih, sayang

  12. batnyam pada 02-05-2021 jam 2. 22.00

    halo, saya punya masalah menggunakan VBA ini,

    kesalahan waktu proses 1004

    wbTarget. Simpan Sebagai Folder_Target & Nama_Kategori & “. xlsx”, 51

    • Ryan pada 26-08-2021 jam 4. 15:00

      Saya memiliki kasus yang sama dengan Anda, tetapi saya tidak dapat menyelesaikannya…;(

      • Sha Nay Jones pada 01-09-2021 jam 5. 35 pagi

        Saya menghapus Target_Folder dan menghapus kesalahan ini

        Untuk secara otomatis membuat tautan di Excel ke jalur, cukup simpan file master ke file yang sama dengan tempat Anda ingin menyimpan Buku Kerja baru

  13. Paragraf pada 09-05-2021 jam 9. 32 siang

    Hei Barang Hebat,

    hanya pertanyaan singkat bagaimana jika saya ingin menambahkan satu kategori lagi dengan yang ada, seperti misalnya mengambil contoh Anda, saat ini saya hanya mengambil "negara bagian" sebagai kategori tetapi bagaimana jika saya ingin memfilter "negara bagian" bersama dengan "Kota"

  14. deva pada 11-09-2021 jam 1. 31 pagi

    Saya hanya menggunakan beberapa baris kode Anda dalam proyek saya dan berhasil bekerja. Terima kasih telah memposting kode berharga ini

  15. Robert Walters pada 23-09-2021 jam 9. 39 sore

    Bagaimana cara mengubah lembar sumber menjadi lembar aktif saya?

  16. kameyo pada 24-09-2021 pukul 6. 25 pagi

    Ini luar biasa. Ini telah banyak membantu saya, tetapi saya akan membutuhkan lebih banyak bantuan jika memungkinkan

    Saya ingin memisahkan Dataset menggunakan kode Anda, tetapi file keluaran yang ingin saya beri nama selalu sama, terlepas dari nilai kolom

    Sebagai contoh. WB1. xlsx, WB2. xlsx, WB3. xlsx, dll. alih-alih menggunakan nilai unik kolom (dalam contoh Anda, nama negara bagian seperti AZ. xlsx, CA. xlsx,…) sebagai nama setiap file

    Bagaimana saya bisa mengedit kode Sumber Anda untuk melakukan ini?

  17. Tamara pada 24-11-2021 pukul 9. 35 sore

    Saya mendapatkan pesan debug dengan string teks berikut. Tolong bisakah Anda memberi saran?

    kol. Menambahkan. Sel(Nomor Baris, “A”). Nilai, CStr(. Sel(Nomor Baris, “A”). Nilai)
    Nomor Baris Berikutnya

  18. Roberto I pada 07-01-2022 jam 5. 11 pagi

    Ini sangat membantu dan saya berterima kasih karena Anda berbagi pengetahuan Anda dengan kami. Terima kasih banyak. Saya punya satu pertanyaan bagaimana saya bisa memasukkan beberapa lembar kerja dalam proses penyimpanan?

  19. Batool pada 27-01-2022 pukul 4. 45 sore

    Terima kasih banyak untuk berbagi pengetahuan Anda. Ini sangat membantu
    Saya ingin bertanya kepada Anda, bagaimana cara membagi data menjadi lembar terpisah di

  20. Eva pada 13-03-2022 jam 9. 45 pagi

    Hi Jie,

    tutorial dan kode VBA ini mengubah hidup. Terima kasih banyak untuk itu. Namun saya akan sangat membutuhkan satu modifikasi lagi, yang saya tidak tahu bagaimana melakukannya. Maukah Anda berbaik hati memberi saya panduan tentang cara mengubah kode jika Anda memiliki "header" yang terdiri dari 10 baris. Data saya dimulai pada baris 11, namun, di setiap file saya ingin menyimpan semua data header dari baris 1-10. Terima kasih

  21. Neil pada 18-03-2022 jam 11. 52 pagi

    Saya memiliki ini berfungsi tetapi saya juga ingin mengecualikan apa pun di kolom lain yang berisi '0'
    Misalnya QTY. Jadi hasil akhirnya hanya memberi saya baris dengan 1 atau lebih di kolom 'QTY'

  22. Dette pada 22-07-2022 pukul 12. 13.00

    Hai. Bisakah saya memverifikasi bagaimana cara mengubah nama file di VBA terkait dengan kode yang Anda berikan?

  23. Berani pada 27-08-2022 jam 2. 31 PM

    Video yang bagus, saya punya satu file CSV Besar yang menampung 12 Juta baris. Saya ingin membagi CSV ini menjadi beberapa file, setiap file akan menjadi 1 juta catatan

  24. Jon pada 04-09-2022 jam 10. 00 pagi

    Saya menjalankan Kode VBA itu membuat file terpisah, tetapi dengan semua data di semua folder. Saya tidak menyimpan di satu drive, tetapi ini adalah file jaringan. Juga jika itu penting, saya memiliki data saya di Power query

    • Luis pada 21-09-2022 jam 6. 14.00

      di 'Sub SplitWorksheet Pribadi (ByVal Category_Name Sebagai Varian)' alih-alih '. salin 'gunakan'. Sel Khusus(xlCellTypeVisible). Salinan'

  25. Conner pada 05-10-2022 jam 12. 10 malam

    Ini menghemat jam kerja manual tim saya. Datang pada tenggat waktu dan alat mewah mengecewakan kami. Terima kasih banyak

    Bagaimana cara membagi Excel menjadi beberapa file di VBA?

    Langkah Membuat Excel Macro untuk Membagi Data Menjadi Beberapa File .
    📌 Buka Editor VBA di Excel
    📌 Buat Sub Prosedur
    📌 Matikan Pembaruan Layar
    📌 Deklarasikan Variabel yang Diperlukan
    📌 Atur Buku Kerja Utama
    📌 Untuk Loop untuk Banyak Buku Kerja
    📌 Buat Buku Kerja Baru
    📌 Pisahkan Data ke dalam File

    Bagaimana cara membagi spreadsheet Excel menjadi file terpisah?

    Pilih di bawah baris tempat Anda ingin memisahkan, atau kolom di sebelah kanan tempat Anda ingin memisahkan. Pada tab Tampilan, di grup Jendela, klik Pisahkan . Untuk menghapus panel pemisah, klik Pisahkan lagi.

    Bagaimana cara membagi lembar kerja menjadi beberapa file?

    silakan pilih rentang yang ingin Anda lakukan. Menggunakan Beranda > Lembar Kerja > Pisahkan Data untuk menerapkan utilitas . Silakan pilih Baris tetap dan masukkan jumlah baris yang diinginkan di kotak yang tersedia di kotak dialog Tanggal Pemisahan menjadi Beberapa Lembar Kerja.