Excel'deki hücrelerdeki boş veya eksik girişleri nasıl önleyebilirim?

Bir çalışma sayfasının A1: B10 aralığında bir tablo oluşturduğunuzu ve bu tablo aralığında boş hücre görünmesini önlemeniz gerektiğini varsayarsak, bunu nasıl başarabiliriz? Bu makale, düzenleme sırasında belirli bir tablo aralığında boş giriş görünüyorsa, bilgi istemi kutusunu otomatik olarak açmak için bir yöntem sunar. Lütfen makaledeki yöntemi adım adım takip edin.

VBA kodunu kullanarak hücrelerde boş veya eksik girişleri önleyin

---

VBA kodunu kullanarak hücrelerde boş veya eksik girişleri önleyin

A1: B10, içinde tablo oluşturmanız gereken aralıktır ve A1, B1, aşağıda gösterilen ekran görüntüsü gibi tablonun başlıklarını içerir. Tabloyu oluştururken A2: B10 aralığında boş veya eksik girişlerin görünmesini önlemek için lütfen aşağıdaki işlemleri yapın.

1. Belirli aralıkta boş girişlere izin vermeyeceğiniz çalışma sayfasında, sayfa sekmesine sağ tıklayın ve ardından Kodu Görüntüle sağ tıklama menüsünden.

2. içinde Uygulamalar için Microsoft Visual Basic penceresinde aşağıdaki VBA kodunu kopyalayıp Kod penceresine yapıştırın. Ekran görüntüsüne bakın:

VBA kodu: Bir dizi hücrede boş veya eksik girişleri önleyin

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

not: VBA kodunda A2: B10, içinde boş hücre bırakmak istemediğiniz hücre aralığıdır. Lütfen aralığı ihtiyaç duyduğunuz şekilde değiştirin.

Şu andan itibaren, boş hücreyi atladığınızda ve belirtilen aralıktaki bir sonraki hücreyi doğrudan doldurduğunuzda, bir Kutools for Excel aşağıda gösterilen ekran görüntüsü gibi iletişim kutusu.

---

İlgili Makaleler:

• Excel'de bir çalışma sayfasının belirli hücrelerine veri girişi nasıl engellenir?
• Excel'de birden çok çalışma sayfasının seçilmesi nasıl engellenir?
• Excel'de belirli bir çalışma sayfasının silinmesini nasıl önleyebilirim?
• Excel'de belirli hücre içeriklerinin silinmesini nasıl önleyebilirim?