Wie verhindert man leere oder fehlende Einträge in Excel-Zellen?
Wenn Sie eine Tabelle im Bereich A1:B10 eines Arbeitsblatts erstellen und sicherstellen möchten, dass dort keine leeren Zellen verbleiben, können Sie eine Lösung einrichten, die automatisch eine Warnmeldung anzeigt, sobald beim Bearbeiten ein leerer Eintrag erkannt wird. Folgen Sie dieser Schritt-für-Schritt-Anleitung, um leere oder fehlende Einträge im angegebenen Tabellenbereich zuverlässig zu verhindern.
Verhindern Sie leere oder fehlende Einträge in Zellen mithilfe von VBA-Code
Verhindern Sie leere oder fehlende Einträge in Zellen mithilfe von VBA-Code
Der Bereich A1:B10 ist für Ihre Tabelle vorgesehen, wobei A1 und B1 als Tabellenüberschriften dienen – wie in der folgenden Abbildung dargestellt. Befolgen Sie die beschriebenen Schritte, um leere oder fehlende Einträge im Bereich A2:B10 beim Ausfüllen der Tabelle zu vermeiden.
1. Klicken Sie im Arbeitsblatt, in dem Sie leere Einträge in einem bestimmten Bereich verhindern möchten, mit der rechten Maustaste auf die Blattregisterkarte und anschließend im Kontextmenü auf Code anzeigen.
2. Kopieren Sie im Fenster Microsoft Visual Basic for Applications den folgenden VBA-Code in das Codefenster. Siehe Abbildung:
VBA-Code: Leere oder fehlende Einträge in einem Zellbereich verhindern
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
Hinweis: Im VBA-Code ist A2:B10 der Zellbereich, in dem Sie keine leeren Zellen hinterlassen möchten. Passen Sie den Bereich entsprechend Ihren Anforderungen an.
Wenn Sie ab sofort eine leere Zelle überspringen und die nächste Zelle im begrenzten Bereich ausfüllen, erscheint ein Kutools für Excel-Dialogfeld wie unten gezeigt.
Verwandte Artikel:
- Wie verhindert man die Dateneingabe in bestimmte Zellen eines Excel-Arbeitsblatts?
- Wie verhindert man die gleichzeitige Auswahl mehrerer Arbeitsblätter in Excel?
- Wie verhindert man, dass ein bestimmtes Arbeitsblatt in Excel gelöscht wird?
- Wie verhindert man das Löschen bestimmter Zellinhalte in Excel?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins