Excel'de hücrelere boş veya eksik veri girişini nasıl engellerim?
Bir çalışma sayfasında A1:B10 aralığında bir tablo oluşturuyorsanız ve bu aralıkta hiçbir hücrenin boş kalmasını istemiyorsanız, düzenleme sırasında boş bir giriş algılandığında otomatik olarak uyarı veren bir çözüm uygulayabilirsiniz. Belirtilen tablo aralığında boş veya eksik girişleri önlemek için aşağıdaki adım adım kılavuzu izleyin.
Hücrelere boş veya eksik girişleri VBA kodu kullanarak önleme
Hücrelere boş veya eksik girişleri VBA kodu kullanarak önleme
A1:B10 aralığı tablonuz için ayrılmıştır; A1 ve B1 hücreleri, aşağıdaki ekran görüntüsünde gösterildiği gibi, tablo başlıklarınızı oluşturur. Tabloyu doldururken A2:B10 aralığında boş veya eksik girişlerin oluşmasını önlemek için aşağıda belirtilen adımları uygulayın.
1. Boş girişleri belirli bir aralıkta önlemek istediğiniz çalışma sayfasında, sayfa sekmesine sağ tıklayın ve ardından kısayol menüsünden Kodu Görüntüle seçeneğine tıklayın.
2. Microsoft Visual Basic for Applications penceresinde, aşağıdaki VBA kodunu Kod penceresine kopyalayıp yapıştırın. Ekran görüntüsüne bakın:
VBA kodu: Bir hücre aralığında boş veya eksik girişleri önleme
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 hiçbir boş hücre bırakmak istemediğiniz aralıktır. Lütfen gerekirse bu aralığı değiştirin.
Artık, belirli bir aralıkta bir hücreyi boş bırakıp hemen ardından gelen hücreyi doldurmaya çalıştığınızda, aşağıdaki gibi bir Kutools for Excel iletişim kutusu görünecektir.
İlgili makaleler:
- Excel'de bir çalışma sayfasının belirli hücrelerine veri girişini nasıl engellerim?
- Excel'de birden fazla çalışma sayfasının seçilmesini nasıl engellerim?
- Excel'de belirli bir çalışma sayfasının silinmesini nasıl önleyebilirim?
- Excel'de belirli hücrelerin içeriğinin silinmesini nasıl önleyebilirim?
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar