Bagaimana cara mencegah entri kosong atau hilang dalam sel di Excel?
Misalkan Anda membuat tabel dalam rentang A1: B10 lembar kerja dan perlu mencegah sel kosong muncul dalam rentang tabel ini, bagaimana cara mencapainya? Artikel ini memperkenalkan metode untuk memunculkan kotak prompt secara otomatis jika entri kosong muncul dalam rentang tabel tertentu saat mengedit. Silakan ikuti metode langkah demi langkah di artikel.
Cegah entri kosong atau hilang dalam sel dengan menggunakan kode VBA
Cegah entri kosong atau hilang dalam sel dengan menggunakan kode VBA
A1: B10 adalah kisaran di mana Anda perlu membuat tabel di dalamnya, dan A1, B1 berisi header tabel seperti gambar di bawah ini. Lakukan hal berikut untuk mencegah entri kosong atau hilang muncul dalam rentang A2: B10 saat membuat tabel.
1. Dalam lembar kerja yang tidak mengizinkan entri kosong dalam kisaran tertentu, klik kanan tab lembar, lalu klik Lihat kode dari menu klik kanan.
2. Dalam Microsoft Visual Basic untuk Aplikasi jendela, salin dan tempel kode VBA di bawah ini ke jendela Kode. Lihat tangkapan layar:
Kode VBA: Mencegah entri kosong atau hilang dalam berbagai sel
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count <> 1 Then Exit Sub
Dim isect As Range
On Error Resume Next
Set isect = Application.Intersect(Target, Range("A2:B10"))
If Not (isect Is Nothing) Then
If Target.Column = 1 Then
If Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0 Then
MsgBox "You cannot skip a row in column A2:B10", vbInformation, "Kutools for Excel"
Target.ClearContents
End If
Else
If (Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0) Or (Len(Target.Value) > 0 And Len(Target.Offset(0, -1).Value) = 0) Then
MsgBox "You cannot skip a row in column A2:B10", vbInformation, "Kutools for Excel"
Target.ClearContents
End If
End If
End If
End Sub
Note: Dalam kode VBA, A2: B10 adalah rentang sel yang tidak ingin Anda tinggalkan di dalam sel kosong. Harap ubah kisaran sesuai kebutuhan Anda.
Mulai sekarang, saat Anda melewatkan sel kosong dan mengisi sel berikutnya dalam kisaran yang ditentukan secara langsung, Anda akan mendapatkan file Kutools untuk Excel kotak dialog seperti gambar di bawah ini yang ditampilkan.
Terkait artikel:
- Bagaimana cara mencegah entri data ke sel tertentu dari lembar kerja di Excel?
- Bagaimana cara mencegah pemilihan beberapa lembar kerja di Excel?
- Bagaimana cara mencegah lembar kerja tertentu dihapus di Excel?
- Bagaimana cara mencegah konten sel tertentu dihapus di Excel?
Alat Produktivitas Kantor Terbaik
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...
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!