Loncat ke daftar isi utama

Bagaimana cara menghapus konten beberapa sel yang digabungkan di Excel?

Jika Anda memiliki lembar kerja besar yang berisi beberapa sel yang digabungkan, dan sekarang, Anda ingin menghapus semua konten dari sel yang digabungkan tetapi tetap mempertahankan sel yang digabungkan. Biasanya, Anda dapat mencoba menerapkan Cari dan Ganti berfungsi untuk memilih semua sel yang digabungkan terlebih dahulu, lalu tekan Delete kunci untuk menghapus nilai, namun, Anda akan mendapatkan pesan peringatan "Kami tidak dapat melakukan itu pada sel yang digabungkan". Dalam kasus ini, bagaimana Anda menghapus nilai dalam sel yang digabungkan tetapi meninggalkan sel yang digabungkan dengan cepat di Excel?

Hapus konten dari beberapa sel yang digabungkan dengan kode VBA

Hapus konten dari beberapa sel yang digabungkan dengan Kutools for Excel


panah gelembung kanan biru Hapus konten dari beberapa sel yang digabungkan dengan kode VBA

Bagian ini, saya dapat membuat kode VBA bagi Anda untuk menyelesaikan tugas ini, lakukan hal berikut:

1. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

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

VBA: Hapus konten dari beberapa sel yang digabungkan

Sub ClearMerged()
'updateby Extendoffice
    Dim Rg As Range, Rg1 As Range
    Dim xAddress As String
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set Rg = Application.InputBox("Please select the range of cells:", "Kutools for Excel", xAddress, , , , , 8)
    If Rg Is Nothing Then Exit Sub
    For Each Rg1 In Rg
        If Rg1.MergeCells Then Rg1.MergeArea.ClearContents
    Next
End Sub

3. Lalu tekan F5 kunci untuk menjalankan kode ini, dan kotak prompt akan muncul untuk mengingatkan Anda memilih rentang yang ingin Anda hapus sel gabungan, lihat tangkapan layar:

doc menghapus sel gabungan 1

4. Dan kemudian klik OK, konten di sel yang digabungkan telah dihapus sekaligus dan biarkan sel gabungan kosong, lihat tangkapan layar:

doc menghapus sel gabungan 2


panah gelembung kanan biru Hapus konten dari beberapa sel yang digabungkan dengan Kutools for Excel

Jika Anda memiliki Kutools untuk Excel, Dengan yang Pilih Sel yang Digabung utilitas, Anda dapat memilih semua sel yang digabungkan dalam pilihan dengan satu klik, lalu menghapusnya sekaligus.

Kutools untuk Excel : dengan lebih dari 300 add-in Excel yang praktis, gratis untuk dicoba tanpa batasan dalam 30 hari. 

Setelah menginstal Kutools untuk Excel, lakukan hal berikut :( Unduh Gratis Kutools untuk Excel Sekarang )

1. Pilih rentang sel yang berisi sel gabungan yang ingin Anda hapus kontennya.

2. Klik Kutools > Pilih > Pilih Sel yang Digabung, lihat tangkapan layar:

3. Dan semua sel yang digabungkan telah dipilih segera, lihat tangkapan layar:

doc menghapus sel gabungan 4

4. Lalu tekan Delete pada keyboard, dan semua nilai dalam sel yang digabungkan telah dipilih tetapi biarkan sel yang digabungkan sesuai kebutuhan.

Klik untuk mengetahui lebih banyak tentang utilitas Select Merged Cells ini ...

Unduh Gratis Kutools untuk Excel Sekarang

Alat Produktivitas Kantor Terbaik

🤖 Kutools AI Ajudan: Merevolusi analisis data berdasarkan: Eksekusi Cerdas   |  Hasilkan Kode  |  Buat Rumus Khusus  |  Analisis Data dan Hasilkan Grafik  |  Aktifkan Fungsi Kutools...
Fitur Populer: Temukan, Sorot, atau Identifikasi Duplikat   |  Hapus Baris Kosong   |  Gabungkan Kolom atau Sel tanpa Kehilangan Data   |   Putaran tanpa Formula ...
Pencarian Super: VLookup Beberapa Kriteria    VLookup Nilai Berganda  |   VLookup di Beberapa Lembar   |   Pencarian Fuzzy ....
Daftar Drop-down Lanjutan: Buat Daftar Drop Down dengan Cepat   |  Daftar Drop Down yang Bergantung   |  Multi-pilih Drop Down List ....
Manajer Kolom: Tambahkan Jumlah Kolom Tertentu  |  Pindahkan Kolom  |  Alihkan Status Visibilitas Kolom Tersembunyi  |  Bandingkan Rentang & Kolom ...
Fitur Unggulan: Fokus Kisi   |  Tampilan Desain   |   Bar Formula Besar    Manajer Buku Kerja & Lembar   |  Perpustakaan Sumberdaya (Teks otomatis)   |  Pemetik tanggal   |  Gabungkan Lembar Kerja   |  Enkripsi/Dekripsi Sel    Kirim Email berdasarkan Daftar   |  Filter Super   |   Filter Khusus (filter tebal/miring/coret...) ...
15 Perangkat Teratas12 Teks Tools (Tambahkan Teks, Hapus Karakter, ...)   |   50 + Grafik jenis (Gantt Chart, ...)   |   40+ Praktis Rumus (Hitung usia berdasarkan ulang tahun, ...)   |   19 Insersi Tools (Masukkan Kode QR, Sisipkan Gambar dari Jalur, ...)   |   12 Konversi Tools (Angka ke Kata, Konversi Mata Uang, ...)   |   7 Gabungkan & Pisahkan Tools (Lanjutan Gabungkan Baris, Pisahkan Sel, ...)   |   ... dan banyak lagi

Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu.  Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...

Deskripsi Produk


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.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Can you please provide VBA code to run this macro across the entire workbook?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
Rate this post:
0   Characters
Suggested Locations