Cara memadamkan baris kosong dalam Excel dengan VBA, formula dan Power Query

  • Berkongsi Ini
Michael Brown

Tutorial ini akan mengajar anda beberapa helah mudah untuk memadam berbilang baris kosong dalam Excel dengan selamat tanpa kehilangan sedikit pun maklumat .

Baris kosong dalam Excel ialah masalah yang kita semua hadapi sekali-sekala, terutamanya apabila menggabungkan data daripada sumber yang berbeza atau mengimport maklumat dari tempat lain. Baris kosong boleh menyebabkan banyak malapetaka pada lembaran kerja anda pada tahap yang berbeza dan memadamkannya secara manual boleh menjadi proses yang memakan masa dan terdedah kepada ralat. Dalam artikel ini, anda akan mempelajari beberapa kaedah mudah dan boleh dipercayai untuk mengalih keluar ruang kosong dalam lembaran kerja anda.

    Cara TIDAK untuk mengalih keluar baris kosong dalam Excel

    Terdapat beberapa cara yang berbeza untuk memadamkan baris kosong dalam Excel, tetapi yang menghairankan banyak sumber dalam talian kekal dengan yang paling berbahaya, iaitu Cari & Pilih > Go To Special > Kosong .

    Apakah yang salah dengan teknik ini? Ia memilih semua kosong dalam julat, dan akibatnya anda akan memadamkan semua baris yang mengandungi sebanyak satu sel kosong.

    Imej di bawah menunjukkan jadual asal di sebelah kiri dan jadual yang terhasil di sebelah kanan. Dan dalam jadual yang terhasil, semua baris yang tidak lengkap ae hilang, malah baris 10 yang hanya tarikh dalam lajur D tiada:

    Intinya: jika anda tidak mahu mengeruhkan data anda, jangan sekali-kali padam kosong baris dengan memilih sel kosong. Sebaliknya, gunakan salah satu pendekatan yang lebih dipertimbangkan yang dibincangkanmenjadikan perkara lebih kompleks daripada yang sepatutnya. Jadi, kami mengambil langkah lebih jauh dan mencipta laluan dua klik untuk memadamkan baris kosong dalam Excel.

    Dengan Suite Ultimate ditambahkan pada reben anda, berikut ialah cara anda boleh memadamkan semua baris kosong dalam lembaran kerja:

    1. Pada tab Ablebits Tools , dalam kumpulan Transform , klik Padam Kosong > Baris Kosong :
    2. Tambahan akan memberitahu anda bahawa semua baris kosong akan dialih keluar daripada lembaran kerja aktif dan meminta untuk mengesahkan. Klik OK, dan dalam seketika, semua baris kosong akan dihapuskan.

    Seperti yang ditunjukkan dalam tangkapan skrin di bawah, kami hanya mengalih keluar baris kosong sama sekali yang tidak mempunyai satu sel dengan data:

    Untuk mencari daripada lebih banyak ciri hebat yang disertakan dengan Ultimate Suite kami untuk Excel, anda dialu-alukan untuk memuat turun versi percubaan.

    Saya berterima kasih kerana membaca dan berharap dapat berjumpa anda di blog kami minggu depan!

    di bawah.

    Cara mengalih keluar baris kosong dalam Excel dengan VBA

    Excel VBA boleh membetulkan banyak perkara, termasuk berbilang baris kosong. Perkara terbaik tentang pendekatan ini ialah ia tidak memerlukan sebarang kemahiran pengaturcaraan. Cuma, ambil salah satu kod di bawah dan jalankannya dalam Excel anda (arahan ada di sini).

    Makro 1. Padamkan baris kosong dalam julat yang dipilih

    Kod VBA ini memadamkan semua kosong secara senyap baris dalam julat yang dipilih, tanpa menunjukkan sebarang mesej atau kotak dialog kepada pengguna.

    Tidak seperti teknik sebelumnya, makro memadamkan baris jika keseluruhan baris kosong . Ia bergantung pada fungsi lembaran kerja CountA untuk mendapatkan bilangan sel tidak kosong dalam setiap baris, dan kemudian memadamkan baris dengan kiraan sifar.

    Public Sub DeleteBlankRows() Dim SourceRange As Range Dim EntireRow As Range Set SourceRange = Application. Pemilihan Jika Tidak (SourceRange Is Nothing ) Kemudian Application.ScreenUpdating = False For I = SourceRange.Rows.Count To 1 Step -1 Set EntireRow = SourceRange.Cells(I, 1).EntireRow If Application.WorksheetFunction.CountA(EntireRow) = 0 Kemudian EntireRow.Delete End If Next Application.ScreenUpdating = True End If End Sub

    Untuk memberi pengguna peluang memilih julat sasaran selepas menjalankan makro , gunakan kod ini:

    Public Sub RemoveBlankLines() Malapkan Julat Sumber Sebagai Julat Malapkan Seluruh Baris Sebagai Julat Pada Ralat Sambung semula Set Seterusnya SourceRange = Application.InputBox( _"Pilih julat:" , "Padam Baris Kosong" , _ Application.Selection.Address, Taip :=8) Jika Tidak (SourceRange Is Nothing ) Maka Application.ScreenUpdating = False For I = SourceRange.Rows.Count To 1 Step - 1 Set EntireRow = SourceRange.Cells(I, 1).EntireRow If Application.WorksheetFunction.CountA(EntireRow) = 0 Kemudian EntireRow.Delete End If Next Application.ScreenUpdating = True End Jika End Sub

    Setelah dijalankan, makro menunjukkan kotak input berikut, anda memilih julat sasaran dan klik OK:

    Seketika, semua baris kosong dalam julat yang dipilih akan dihapuskan dan yang selebihnya akan beralih ke atas:

    Makro 2. Padamkan semua baris kosong dalam Excel

    Untuk mengalih keluar semua baris kosong pada helaian aktif , tentukan baris terakhir julat yang digunakan (iaitu baris yang mengandungi sel terakhir dengan data), dan kemudian pergi ke atas memadamkan baris yang CountA mengembalikan sifar:

    Sub DeleteAllEmptyRows() Malapkan LastRowIndex Sebagai Integer Malap RowIndex Sebagai Integer Malap UsedRng Sebagai Set Julat UsedRng = Activ eSheet.UsedRange LastRowIndex = UsedRng.Row - 1 + UsedRng.Rows.Count Application.ScreenUpdating = Palsu Untuk RowIndex = LastRowIndex Ke 1 Langkah -1 Jika Application.CountA(Rows(RowIndex)) = 0 Kemudian Rows(RowIndex).Padam Tamat Jika Next RowIndex Application.ScreenUpdating = True End Sub

    Makro 3. Padam baris jika sel kosong

    Dengan makro ini, anda boleh memadamkan keseluruhan baris jika sel dalam yang ditentukanlajur kosong.

    Kod berikut menyemak lajur A untuk kekosongan. Untuk memadamkan baris berdasarkan lajur lain, gantikan "A" dengan huruf yang sesuai.

    Sub DeleteRowIfCellBlank() On Ralat Resume Next Columns( "A" ).SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub

    Sebagai Sebenarnya, makro menggunakan ciri Go To Special > Blanks dan anda boleh mencapai hasil yang sama dengan melakukan langkah ini secara manual.

    Nota. Makro memadamkan baris kosong dalam keseluruhan helaian , jadi sila berhati-hati apabila menggunakannya. Sebagai langkah berjaga-jaga, mungkin bijak untuk menyandarkan lembaran kerja sebelum menjalankan makro ini.

    Cara mengalih keluar baris kosong dalam Excel dengan VBA

    Untuk memadamkan baris kosong dalam Excel menggunakan makro, anda boleh sama ada memasukkan kod VBA ke dalam buku kerja anda sendiri atau menjalankan makro daripada buku kerja sampel kami.

    Tambah makro pada buku kerja anda

    Untuk memasukkan makro dalam buku kerja anda, lakukan langkah berikut:

    1. Buka lembaran kerja yang anda mahu padamkan baris kosong.
    2. Tekan Alt + F11 untuk membuka Editor Visual Basic.
    3. Pada anak tetingkap kiri, klik kanan Buku Kerja Ini dan kemudian klik Sisipkan > Modul .
    4. Tampal kod dalam tetingkap Kod.
    5. Tekan F5 untuk menjalankan makro.

    Untuk mendapatkan arahan langkah demi langkah yang terperinci, sila lihat Cara untuk memasukkan dan menggunakan VBA dalam Excel.

    Jalankan makro daripada buku kerja sampel kami

    Muat turun sampel kamibuku kerja dengan Makro untuk Memadam Baris Kosong dan jalankan salah satu daripada makro berikut dari sana:

    PadamBaris Kosong - mengalih keluar baris kosong dalam julat yang dipilih sekarang.

    Alih Keluar Talian Kosong - memadamkan baris kosong dan beralih ke atas dalam julat yang anda pilih selepas menjalankan makro.

    DeleteAllEmptyRows - memadam semua baris kosong pada helaian aktif.

    DeleteRowIfCellBlank - memadamkan baris jika sel dalam lajur tertentu kosong.

    Untuk menjalankan makro dalam Excel anda, lakukan perkara berikut:

    1. Buka memuat turun buku kerja dan dayakan makro jika digesa.
    2. Buka buku kerja anda sendiri dan navigasi ke lembaran kerja yang diminati.
    3. Dalam lembaran kerja anda, tekan Alt + F8, pilih makro dan klik Jalankan .

    Formula untuk memadamkan baris kosong dalam Excel

    Sekiranya anda ingin melihat perkara yang anda padamkan, gunakan formula berikut untuk mengenal pasti baris kosong:

    =IF(COUNTA(A2:D2)=0, "Blank", "Not blank")

    Di mana A2 ialah yang pertama dan D2 ialah sel yang terakhir digunakan bagi baris data pertama.

    Masukkan formula ini a dalam E2 atau mana-mana lajur kosong lain dalam baris 2, dan seret pemegang isian untuk menyalin formula ke bawah.

    Akibatnya, anda akan mempunyai "Kosong" dalam baris kosong dan "Tidak kosong" dalam baris yang mengandungi sekurang-kurangnya satu sel dengan data:

    Logik formula adalah jelas: anda mengira sel bukan kosong dengan fungsi COUNTA dan menggunakan pernyataan IF untuk mengembalikan "Kosong" untuk kiraan sifar, "Tidak Kosong" sebaliknya .

    Dalamsebenarnya, anda boleh melakukannya dengan baik tanpa JIKA:

    =COUNTA(A2:D2)=0

    Dalam kes ini, formula akan mengembalikan BENAR untuk baris kosong dan FALSE untuk baris bukan kosong.

    Dengan formula sedia ada, jalankan langkah ini untuk memadamkan baris kosong:

    1. Pilih mana-mana sel dalam baris pengepala dan klik Isih & Tapis > Tapis pada tab Laman Utama , dalam Format Ini akan menambah anak panah lungsur turun penapisan pada semua sel pengepala.
    2. Klik anak panah dalam pengepala lajur formula, nyahtanda (Pilih Semua), pilih Kosong dan klik OK :
    3. Pilih semua baris yang ditapis . Untuk ini, klik pada sel pertama baris pertama yang ditapis dan tekan Ctrl + Shift + End untuk melanjutkan pemilihan ke sel terakhir baris terakhir yang ditapis.
    4. Klik kanan pada pilihan, pilih Padam baris daripada menu konteks, dan kemudian sahkan bahawa anda benar-benar mahu memadamkan keseluruhan baris:
    5. Alih keluar penapis dengan menekan Ctrl + Shift + L . Atau klik tab Laman Utama > Isih & Tapis > Tapis .
    6. Padamkan lajur dengan formula kerana anda tidak memerlukannya lagi.

    Itu sahaja! Hasilnya, kami mempunyai jadual yang bersih tanpa garisan kosong, tetapi semua maklumat disimpan:

    Petua. Daripada memadamkan baris kosong, anda boleh menyalin baris bukan kosong ke tempat lain. Untuk melakukannya, tapis baris "Tidak kosong", pilih baris tersebut dan tekan Ctrl + C untuk menyalin. Kemudian beralih kepadahelaian lain, pilih sel kiri atas julat destinasi dan tekan Ctrl + V untuk menampal.

    Cara mengalih keluar baris kosong dalam Excel dengan Power Query

    Dalam Excel 2016 dan Excel 2019, terdapat satu lagi cara untuk memadamkan baris kosong - dengan menggunakan ciri Power Query. Dalam Excel 2010 dan Excel 2013, ia boleh dimuat turun sebagai tambahan.

    Nota penting! Kaedah ini berfungsi dengan kaveat berikut: Power Query menukar data sumber kepada jadual Excel dan menukar pemformatan seperti warna isian, sempadan dan beberapa format nombor. Jika pemformatan data asal anda adalah penting kepada anda, maka lebih baik anda memilih cara lain untuk mengalih keluar baris kosong dalam Excel.

    1. Pilih julat yang anda mahu padamkan baris kosong.
    2. Pergi ke tab Data > Dapatkan & Ubah kumpulan dan klik Dari Jadual/Julat . Ini akan memuatkan jadual anda ke Editor Power Query.
    3. Pada tab Laman Utama Editor Pertanyaan Kuasa, klik Alih Keluar Baris > Alih Keluar Baris Kosong .
    4. Klik Tutup & Muatkan Ini akan memuatkan jadual yang terhasil ke lembaran kerja baharu dan menutup Editor Pertanyaan.

    Dalam hasil manipulasi ini, saya mendapat jadual berikut tanpa baris kosong, tetapi dengan beberapa perubahan buruk - format mata wang hilang dan tarikh dipaparkan dalam format lalai bukannya yang tersuai:

    Cara memadamkan baris jikasel dalam lajur tertentu kosong

    Pada permulaan tutorial ini, kami memberi amaran kepada anda agar tidak mengalih keluar baris kosong dengan memilih tempat kosong. Walau bagaimanapun, kaedah ini berguna jika anda ingin memadamkan baris berdasarkan kosong dalam lajur tertentu .

    Sebagai contoh, mari kita alih keluar semua baris di mana sel dalam lajur A kosong :

    1. Pilih lajur utama, lajur A dalam kes kami.
    2. Pada tab Laman Utama , klik Cari & Pilih > Pergi Ke Khas . Atau tekan F5 dan klik butang Khas… .
    3. Dalam dialog Go To Special , pilih Kosong dan klik OK . Ini akan memilih sel kosong dalam julat yang digunakan dalam lajur A.
    4. Klik kanan pada mana-mana sel yang dipilih dan pilih Padam… daripada menu konteks.
    5. Dalam kotak dialog Padam , pilih Seluruh baris dan klik OK.

    Selesai! Baris yang tidak mempunyai nilai dalam lajur A tiada lagi:

    Hasil yang sama boleh dicapai dengan menapis kosong dalam lajur utama.

    Cara mengalih keluar baris tambahan di bawah data

    Kadangkala, baris yang kelihatan kosong sepenuhnya mungkin mengandungi beberapa format atau aksara tidak boleh dicetak. Untuk menyemak sama ada sel terakhir dengan data benar-benar sel terakhir digunakan dalam lembaran kerja anda, tekan Ctrl + Tamat . Jika ini telah membawa anda ke baris kosong secara visual di bawah data anda, dari segi Excel, baris itu tidak kosong. Untuk mengalih keluar baris sedemikian, lakukanberikut:

    1. Klik pengepala baris kosong pertama di bawah data anda untuk memilihnya.
    2. Tekan Ctrl + Shift + End . Ini akan memilih semua baris yang mengandungi apa-apa sahaja termasuk format, ruang dan aksara bukan cetakan.
    3. Klik kanan pilihan dan pilih Padam… > Seluruh baris.

    Jika anda mempunyai set data yang agak kecil, anda mungkin mahu membuang semua baris kosong di bawah data anda, mis. untuk memudahkan penatalan. Walaupun, tiada cara untuk memadamkan baris yang tidak digunakan dalam Excel, tiada apa yang akan menghalang anda daripada menyembunyikan nya. Begini caranya:

    1. Pilih baris di bawah baris terakhir dengan data dengan mengklik pengepalanya.
    2. Tekan Ctrl + Shift + Anak panah ke bawah untuk melanjutkan pemilihan ke baris terakhir pada helaian .
    3. Tekan Ctrl + 9 untuk menyembunyikan baris yang dipilih. Atau klik kanan pada pilihan, dan kemudian klik Sembunyikan .

    Untuk menyahsembunyikan baris , tekan Ctrl + A untuk memilih keseluruhan helaian, kemudian tekan Ctrl + Shift + 9 untuk menjadikan semua baris kelihatan semula.

    Dengan cara yang sama, anda boleh menyembunyikan lajur kosong yang tidak digunakan di sebelah kanan data anda. Untuk langkah terperinci, sila lihat Sembunyikan baris yang tidak digunakan dalam Excel supaya hanya kawasan kerja kelihatan.

    Cara terpantas untuk mengalih keluar baris kosong dalam Excel

    Semasa membaca contoh sebelumnya, bukankah rasa seperti kami menggunakan tukul besi untuk memecahkan kacang? Di sini, di Ablebits, kami memilih untuk tidak melakukannya

    Michael Brown ialah peminat teknologi yang berdedikasi dengan semangat untuk memudahkan proses kompleks menggunakan alat perisian. Dengan lebih sedekad pengalaman dalam industri teknologi, beliau telah mengasah kemahirannya dalam Microsoft Excel dan Outlook, serta Helaian Google dan Dokumen. Blog Michael berdedikasi untuk berkongsi pengetahuan dan kepakarannya dengan orang lain, menyediakan petua dan tutorial yang mudah diikuti untuk meningkatkan produktiviti dan kecekapan. Sama ada anda seorang profesional berpengalaman atau pemula, blog Michael menawarkan pandangan berharga dan nasihat praktikal untuk memanfaatkan sepenuhnya alatan perisian penting ini.