Hoe kunt u ervoor zorgen dat alleen datumnotatie is toegestaan in specifieke cellen in Excel?
Het beperken van specifieke cellen tot uitsluitend datumnotatie in Excel draagt bij aan een consistente en foutloze gegevensinvoer. Deze handleiding beschrijft twee eenvoudige methoden: via de ingebouwde functie Gegevensvalidatie of met een korte VBA-code om ervoor te zorgen dat alleen datums kunnen worden ingevoerd in de geselecteerde cellen.
Alleen Datumnotatie toestaan in specifieke cellen met de functie Gegevensvalidatie
Alleen Datumnotatie toestaan in specifieke cellen met VBA-code
Alleen Datumnotatie toestaan in specifieke cellen met de functie Gegevensvalidatie
In Excel is de functie Gegevensvalidatie een krachtig hulpmiddel waarmee u vervolgkeuzelijsten kunt maken, dubbele invoer kunt voorkomen, invoer kunt beperken en nog veel meer. U kunt hiermee ook voorkomen dat er in specifieke cellen andere gegevens dan een datum worden ingevoerd. Volg hiervoor de volgende stappen:
1. Klik op Gegevens > Gegevensvalidatie > Gegevensvalidatie, zie schermafbeelding:

2. In het dialoogvenster Gegevensvalidatie klikt u op het tabblad Instellingen en kiest u Aangepast in de vervolgkeuzelijst Toestaan. Voer vervolgens de volgende formule in het tekstvak Formule in: =AND(ISNUMBER(B2),LEFT(CELL("format",B2),1)=„D"), zie schermafbeelding:

Opmerking: In de bovenstaande formule is B2 de eerste cel van de kolom waarvoor u de gegevensvalidatie wilt beperken.
3.Klik vervolgens op het tabblad Foutmeldingin het dialoogvenster en voer de volgende stappen uit:

(1.) Schakel Foutmelding weergeven nadat ongeldige gegevens zijn ingevoerdin;
(2.) Kies in de vervolgkeuzelijst StijlSelecteer alstublieft Stoppenin;
(3.) Typ de Titel en Foutmelding die u wilt weergeven in het meldingsvenster.
4. Nadat u de instellingen hebt voltooid, klikt u op OK en verschijnt er nu een meldingsvenster wanneer u gegevens invoert die niet voldoen aan de geldige datumnotatie, zoals in de volgende schermafbeelding wordt weergegeven:

Alleen Datumnotatie toestaan in specifieke cellen met VBA-code
De tweede methode gebruikt VBA-code om deze taak uit te voeren.
1. Activeer het werkblad dat u wilt gebruiken.
2. Klik vervolgens met de rechtermuisknop op het bladtabblad en selecteer Code weergeven in het contextmenu, zie schermafbeelding:

3. Plak in het weergegeven venster Microsoft Visual Basic for Applications de onderstaande code in de Module, zie schermafbeelding:
VBA-code: Alleen Datumnotatie toestaan in specifieke cellen:
Private Sub Worksheet_Change(ByVal Target As Range)
'updateby Extendoffice
Set w = ActiveSheet.Range("B2:B12")
For Each c In w
If c.Value <> "" And Not IsDate(c) Then
c.ClearContents
MsgBox "Only a date format is permitted in this cell."
End If
Next c
End Sub

4. Sla de code op en sluit af. Wanneer u nu een waarde invoert in het bereik B2:B12 die niet voldoet aan de datumnotatie, verschijnt er een meldingsvenster en wordt de celwaarde direct gewist, zie schermafbeelding:

Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins