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

Bagaimana cara menghapus konten sel tertentu saat dibuka dan keluar di buku kerja Excel?

Artikel ini membahas tentang membersihkan konten sel tertentu saat membuka atau menutup buku kerja Excel.

Hapus konten sel tertentu pada buku kerja buka dan keluar


Hapus konten sel tertentu pada buku kerja buka dan keluar

Harap lakukan hal berikut untuk menghapus konten sel yang ditentukan pada buku kerja buka dan keluar.

Pertama, Anda perlu menyimpan buku kerja yang Anda perlukan untuk menghapus konten sel tertentu saat membuka atau keluar sebagai Buku Kerja Excel Macro-enabled.

1. Silakan klik File > Save As > Browse. Lihat tangkapan layar:

2. Dalam Save As kotak dialog, pilih folder untuk menyimpan buku kerja, masukkan nama baru ke dalam Nama file kotak yang Anda butuhkan, pilih Buku Kerja Excel dengan Makro Aktif dari Sava sebagai tipe daftar drop-down, dan kemudian klik Save .

3. Dalam bermunculan Microsoft Excel kotak dialog, silakan klik OK tombol seperti gambar di bawah ini.

4. Buka Buku Kerja Macro-Enabled yang baru saja Anda simpan, tekan lain + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

5. Dalam Microsoft Visual Basic untuk Aplikasi jendela, klik dua kali Buku Kerja Ini di panel kiri, lalu salin kode VBA di bawah ini ke jendela Kode.

Kode VBA 1: Hapus konten sel yang ditentukan pada buku kerja terbuka

Private Sub Workbook_Open()
'Updated by Extendoffice 20190712
    Application.EnableEvents = False
        Worksheets("test").Range("A1:A11").Value = ""
    Application.EnableEvents = True
End Sub

Kode VBA 2: Hapus konten sel tertentu saat keluar buku kerja

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Updated by Extendoffice 20190712
    Worksheets("test").Range("A1:A11").Value = ""
End Sub

Note: Dalam kode di atas, tes, dan A1: A11 adalah nama lembar kerja dan rentang sel Anda akan menghapus isinya. Harap ubah sesuai kebutuhan Anda.

6. tekan lain + Q kunci untuk keluar dari Microsoft Visual Basic untuk Aplikasi jendela.

Mulai sekarang, saat membuka atau menutup buku kerja, konten sel tertentu di lembar kerja tertentu akan dihapus secara otomatis.


Artikel terkait:


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-2021 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.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
officetab bawah
Urutkan komentar berdasarkan
komentar (9)
Belum ada peringkat. Jadilah yang pertama memberi peringkat!
Komentar ini diminimalkan oleh moderator di situs
Dear Sir/Madam, sheet saya dilindungi dan hanya sel tertentu (untuk pembersihan data) tidak dilindungi tetapi ketika saya memasukkan nilai yang ditentukan & kemudian buka kembali file excel maka nilai dihapus oleh kode VBA tetapi sel yang ditentukan adalah dilindungi, saya harus membuka proteksi sel dengan membuka proteksi lembar, edit rentang yang dapat diedit lagi & lagi, jadi tolong perbaiki.
Terima kasih sebelumnya
Komentar ini diminimalkan oleh moderator di situs
Hi Sanjaya Sharma,
Maaf atas ketidaknyamanannya. Harap terapkan kode VBA di bawah ini dan jangan lupa untuk mengganti nama lembar dan rentang sesuai kebutuhan Anda. Terima kasih atas komentarmu.

Kode VBA 1:
Sub Workbook_Open Pribadi ()
Application.EnableEvents = Salah
Worksheets("Sheet1").Range("A1:A11").Nilai = ""
Application.EnableEvents = Benar
End Sub

Kode VBA 2:
Sub Workbook_BeforeClose Pribadi (Batalkan Sebagai Boolean)
Worksheets("Sheet1").Range("A1:A11").Nilai = ""
End Sub
Komentar ini diminimalkan oleh moderator di situs
Halo, untuk rentang bagaimana saya memasukkan kode jika saya ingin memilih beberapa rentang atau sel?
Komentar ini diminimalkan oleh moderator di situs
Adakah yang bisa membantu saya cara mengosongkan sel lembar (hanya dalam satu baris dan bukan seluruh Lembar). Kode di bawah ini menghapus konten di semua baris lembar. Tapi saya ingin konten dihapus hanya di baris9

Sub Workbook_Open Pribadi ()

'Diperbaharui oleh Extendoffice 20190712

Application.EnableEvents = Salah

Worksheets("test").Range("A1:A11").Value = ""

Application.EnableEvents = Benar

End Sub
Komentar ini diminimalkan oleh moderator di situs
Adakah yang bisa membantu saya cara mengosongkan sel lembar (hanya dalam satu baris dan bukan seluruh Lembar). Kode di bawah ini menghapus konten di semua baris lembar. Tapi saya ingin konten dihapus hanya di baris9



Sub Workbook_Open Pribadi ()

'Diperbaharui oleh Extendoffice 20190712

Application.EnableEvents = Salah

Worksheets("test").Range("A1:A11").Value = ""

Application.EnableEvents = Benar

End Sub
Komentar ini diminimalkan oleh moderator di situs
Hai,
VBA di atas hanya menghapus nilai sel rentang A1:A11. Jika Anda hanya ingin menghapus nilai di baris 9, Anda dapat mengganti A1:A11 dengan 9:9. Lihat kode di bawah ini.

Sub Workbook_Open Pribadi ()

'Diperbaharui oleh Extendoffice 20200522

Application.EnableEvents = Salah

Worksheets("test").Range("9:9").Value = ""

Application.EnableEvents = Benar

End Sub
Komentar ini diminimalkan oleh moderator di situs
Teman-teman Saya mencoba kode yang disarankan tanpa efek terbuka>

Sub Workbook_Open Pribadi ()


Application.EnableEvents = Salah

Lembar Kerja("Klien").Rentang("A9:K900").Nilai = ""

Application.EnableEvents = Benar

End Sub


Makro berfungsi dari dalam buku kerja tetapi tidak saat buku kerja terbuka.

Bantuan apa pun akan sangat dihargai!
Komentar ini diminimalkan oleh moderator di situs
Halo TUDOSE GELU,
Kode berfungsi dengan baik dalam kasus saya.
Jangan lupa masukkan kodenya di ThisWorkbook (Kode) jendela, dan simpan buku kerja sebagai Excel Makro-Diaktifkan buku kerja.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/2022-oct/oct-2.png
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/2022-oct/oct-1.png
Komentar ini diminimalkan oleh moderator di situs
Terima Kasih Kristal! Berhasil.

G
Belum ada komentar yang diposting di sini

Ikuti kami

Hak Cipta © 2009 - www.extendoffice.com. | Seluruh hak cipta. Dipersembahkan oleh ExtendOffice. | Peta Situs
Microsoft dan logo Office adalah merek dagang atau merek dagang terdaftar dari Microsoft Corporation di Amerika Serikat dan / atau negara lain.
Dilindungi oleh Sectigo SSL