Note: The other languages of the website are Google-translated. Back to English
English English

Bagaimana cara menyalin dan menempel hanya sel yang tidak kosong di Excel?

Sebagian besar dari kita mungkin mengalami masalah ini, ketika kita menyalin daftar data yang berisi beberapa sel kosong, dan kemudian menempelkannya ke kolom lain, sel kosong juga akan ditempelkan. Ini sangat mengganggu ketika kita tidak membutuhkan yang kosong dan hanya ingin menempelkan sel yang tidak kosong. Dalam hal ini, bagaimana kita bisa menyalin dan menempel hanya sel yang tidak kosong di Excel dengan cepat dan nyaman? Berikut beberapa trik cepat untuk Anda mengatasinya:

Salin dan tempel hanya sel yang tidak kosong dengan perintah Go To Special

Salin dan tempel hanya sel yang tidak kosong dengan fitur Filter

Salin dan tempel hanya sel yang tidak kosong dengan Formula Array

Salin dan tempel hanya sel yang tidak kosong dengan kode VBA

Salin dan tempel hanya sel yang tidak kosong dengan Kutools for Excel ide bagus3


panah gelembung kanan biru Salin dan tempel hanya sel yang tidak kosong dengan perintah Go To Special

Dengan Pergi ke khusus perintah, Anda dapat memilih semua data terlebih dahulu, lalu menyalin dan menempelkannya ke lokasi lain.

1. Pilih daftar data yang ingin Anda gunakan.

doc-copy-only-nonblanks1

2. Lalu klik Beranda > Temukan & Pilih > Pergi ke khusus, lihat tangkapan layar:

doc-copy-only-nonblanks1

3. di Pergi ke khusus kotak dialog, periksa Konstanta opsi, lihat tangkapan layar:

doc-copy-only-nonblanks1

4. Lalu klik OK, dan hanya sel nilai yang telah dipilih dalam daftar.

doc-copy-only-nonblanks1

5. Dan kemudian salin dan tempel data ke lokasi yang Anda inginkan. Dan hanya nilai sel yang tidak kosong yang telah ditempel. Lihat tangkapan layar:

doc-copy-only-nonblanks1

Note: Metode ini hanya tersedia untuk konstanta, tidak diterapkan ke sel rumus.


panah gelembung kanan biru Salin dan tempel hanya sel yang tidak kosong dengan fitur Filter

The SARING Fitur dapat membantu Anda memfilter sel yang tidak kosong terlebih dahulu, lalu Anda dapat menyalin dan menempelkannya ke sel lain sesuai kebutuhan.

2. Klik Data > SARING, lihat tangkapan layar:

salinan dokumen hanya nonblanks6

3. Kemudian klik tombol tarik-turun di sudut kanan sel dalam daftar yang dipilih, dan hapus centang Kosong opsi di bawah menu drop down. Lihat tangkapan layar:
doc-copy-only-nonblanks1

4. Dan kemudian klik OK, semua sel yang tidak kosong telah disaring seperti gambar berikut yang ditampilkan:

doc-copy-only-nonblanks1

5. Akhirnya, Anda dapat menyalin data yang difilter dan menempelkannya ke lokasi mana pun yang Anda butuhkan.

Note: Nilai dan rumus diterapkan menggunakan cara ini.


Pilih sel yang tidak kosong sekaligus

Klik untuk uji coba fitur lengkap gratis dalam 30 hari!
doc kutools memilih sel yang tidak kosong

panah gelembung kanan biru Salin dan tempel hanya sel yang tidak kosong dengan Formula Array

Untuk menyalin dan menempelkan hanya sel yang tidak kosong, Anda juga bisa menerapkan rumus array berikut.

1. Selain data Anda, masukkan rumus berikut ke sel kosong:

=LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15<>"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))

doc-copy-only-nonblanks1

Note: Dalam rumus di atas, A1: A15 adalah daftar data yang ingin Anda gunakan. Anda dapat mengubahnya sesuai kebutuhan.

2. Lalu tekan Shift + Ctrl + Enter bersama-sama, lalu pilih sel B1, dan seret gagang isian ke rentang yang Anda inginkan untuk memuat rumus ini, dan semua nilai sel yang tidak kosong telah diekstraksi. Lihat tangkapan layar:

doc-copy-only-nonblanks1

3. Karena ini adalah rumus, saat Anda menyalinnya ke tempat lain, Anda harus menyalin dan menempelkannya sebagai nilai.

Note: Rumus ini hanya tersedia untuk konstanta, tidak diterapkan ke sel rumus.


panah gelembung kanan biru Salin dan tempel hanya sel yang tidak kosong dengan kode VBA

Jika Anda tertarik dengan kode VBA, Anda dapat menjalankan kode berikut untuk menyelesaikan tugas ini.

1. Tahan ALT + F11 kunci, dan itu membuka Jendela Microsoft Visual Basic for Applications.

2. Klik Menyisipkan > Modul, dan tempel kode berikut di Jendela Modul.

Kode VBA: Salin dan tempel hanya sel yang tidak kosong di Excel

Sub PasteNotBlanks()
'Update 20140325
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
If InputRng.Columns.Count > 1 Then
    MsgBox "Please select one column."
    Exit Sub
End If
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
InputRng.SpecialCells(xlCellTypeConstants).Copy Destination:=OutRng.Range("A1")
End Sub

3. Lalu tekan F5 kunci untuk menjalankan kode ini, kotak prompt akan muncul untuk mengingatkan Anda memilih rentang data yang ingin Anda gunakan. Lihat tangkapan layar:

doc-copy-only-nonblanks1

4. Dan kemudian klik OK, kotak prompt lain akan muncul untuk membiarkan Anda memilih sel untuk meletakkan data.

doc-copy-only-nonblanks1

5. Klik OK untuk menyelesaikan kode ini, dan hanya nilai sel yang tidak kosong yang telah ditempelkan ke posisi yang Anda tentukan.

Note: Kode ini hanya tersedia untuk konstanta.


panah gelembung kanan biru Salin dan tempel hanya sel yang tidak kosong dengan Kutools for Excel

Apakah ada cara yang lebih mudah dari diatas? Tentu saja, Kutools untuk Excel's Pilih Sel Tidak KosongUtilitas s dapat membantu Anda memilih sel yang tidak kosong terlebih dahulu, lalu menyalin dan menempelkannya.

Kutools untuk Excel, dengan lebih dari 300 fungsi praktis, membuat pekerjaan Anda lebih mudah. 

Setelah pemasangan gratis Kutools for Excel, lakukan seperti di bawah ini:

1. Pilih rentang sel, dan klik Kutools > Pilih > Pilih Sel Tidak Kosong. Lihat tangkapan layar:
doc pilih sel yang tidak kosong 2

2. Kemudian sel tidak kosong dipilih, tekan Ctrl + C untuk menyalinnya, lalu pilih sel tempat Anda ingin menampilkan hasil paset, tekan Ctrl + V untuk menempelkan sel tidak kosong yang dipilih. Lihat tangkapan layar:
doc pilih sel yang tidak kosong 3

panah gelembung kanan biru Salin dan tempel hanya sel yang tidak kosong

Kutools for Excel: 300+ fungsi yang harus Anda miliki di Excel, Uji coba gratis 30 hari dari sini

Alat Produktivitas Kantor Terbaik

Kutools for Excel Memecahkan Sebagian Besar Masalah Anda, dan Meningkatkan Produktivitas Anda hingga 80%

  • Reuse: Masukkan dengan cepat rumus, bagan yang kompleks dan apa pun yang pernah Anda gunakan sebelumnya; Enkripsi Sel dengan kata sandi; Buat Milis dan mengirim email ...
  • Bilah Formula Super (dengan mudah mengedit beberapa baris teks dan rumus); Membaca Tata Letak (membaca dan mengedit sel dalam jumlah besar dengan mudah); Tempel ke Rentang yang Difilter...
  • Gabungkan Sel / Baris / Kolom tanpa kehilangan Data; Pisahkan Konten Sel; Gabungkan Baris / Kolom Duplikat... Mencegah Sel Duplikat; Bandingkan Rentang...
  • Pilih Duplikat atau Unik Baris; Pilih Baris Kosong (semua sel kosong); Temukan Super dan Temukan Fuzzy di Banyak Buku Kerja; Pilih Acak ...
  • Salinan Tepat Beberapa Sel tanpa mengubah referensi rumus; Buat Referensi Otomatis ke Beberapa Lembar; Sisipkan Poin, Kotak Centang, dan lainnya ...
  • Ekstrak Teks, Tambahkan Teks, Hapus berdasarkan Posisi, Hapus Space; Membuat dan Mencetak Subtotal Paging; Konversi Konten Antar Sel dan Komentar...
  • Filter Super (simpan dan terapkan skema filter ke sheet lain); Penyortiran Lanjutan menurut bulan / minggu / hari, frekuensi dan lainnya; Filter Khusus dengan huruf tebal, miring ...
  • Gabungkan Workbooks dan WorkSheets; Gabungkan Tabel berdasarkan kolom kunci; Pisahkan Data menjadi Beberapa Lembar; Konversi Batch xls, xlsx dan PDF...
  • Lebih dari 300 fitur canggih. Mendukung Office / Excel 2007-2019 dan 365. Mendukung semua bahasa. Penerapan yang mudah di perusahaan atau organisasi Anda. Fitur lengkap uji coba gratis 30 hari. Jaminan uang kembali 60 hari.
tab kte 201905

Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Tingkatkan produktivitas Anda hingga 50%, dan kurangi ratusan klik mouse untuk Anda setiap hari!
officetab bawah
Urutkan komentar berdasarkan
komentar (11)
Belum ada peringkat. Jadilah yang pertama memberi peringkat!
Komentar ini diminimalkan oleh moderator di situs
terima kasih untuk formula supernya: =LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15"",ROW($A$1: $A$15),ROWS($B$1:B1)))))
Komentar ini diminimalkan oleh moderator di situs
Formula ini benar-benar luar biasa, terima kasih. Sayangnya rusak ketika mencoba menyalin dari lembar lain, apakah ada solusinya?
Komentar ini diminimalkan oleh moderator di situs
perbaiki referensi saat menggunakan rumus di antara lembar yang berbeda. Itu tidak bekerja. =LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX('Daftar item yang Terlambat'!A:A,SMALL(IF('Daftar item yang Terlambat'!A$1:A$1500"", ROW('Daftar item Terlambat'!A$1:A$1500)),ROWS('Daftar item Terlambat'!B$1:B2)))))
Komentar ini diminimalkan oleh moderator di situs
Apakah ada cara untuk membuat makro berfungsi saat merujuk di antara lembar yang berbeda?
Komentar ini diminimalkan oleh moderator di situs
Hai #abc Saya telah menggunakan rumus Anda =LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX('Daftar item Terlambat'!A:A,SMAL L(IF('Daftar item Terlambat' !A$1:A$15 00"",ROW('Daftar item Terlambat'!A$1:A$15 00)),ROWS('Daftar item Terlambat'!B$1:B2)) ))) Saya memiliki data di satu Lembar Kerja dan ingin menyalin data itu ke lembar kerja lain (dokumen yang sama). Bisakah kamu menolong?
Komentar ini diminimalkan oleh moderator di situs
Alat ini menghapus sel kosong dan mengompres baris. Saya ingin format dipertahankan, termasuk spasi, tetapi saya tidak ingin sel kosong menimpa sel yang berisi data yang ada. yaitu saya ingin menambahkan sel baru yang disalin dalam kolom ke kolom yang ada.
Komentar ini diminimalkan oleh moderator di situs
Ketika saya memilih dan menyalin hanya sel yang tidak kosong, bagaimana saya bisa menempelkannya di tempat lain dengan menjaga rentang kosong yang sama di antara mereka?
Komentar ini diminimalkan oleh moderator di situs
Terima kasih untuk tips yang bagus! Saya menggunakan fitur Temukan & Pilih, tetapi butuh waktu lama karena spreadsheet saya berisi 70 kolom dan 450 ribu baris. Apakah ada cara untuk mempercepat proses?
Komentar ini diminimalkan oleh moderator di situs
Tidak bekerja pada Angka !!!
Bekerja dengan baik pada teks !!!
Tolong dibimbing
Komentar ini diminimalkan oleh moderator di situs
Rumus array Berfungsi dengan baik pada teks
tapi jangan bekerja pada angka.
Komentar ini diminimalkan oleh moderator di situs
=Filter(A:A,A:A<>"")
Belum ada komentar yang diposting di sini
Tinggalkan komentar anda
Posting sebagai Tamu
×
Beri peringkat pos ini:
0   Karakter
Lokasi yang Disarankan