• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Cel beperken tot enkel datum op maandag invoeren

Status
Niet open voor verdere reacties.
P

pimcl

Gebruiker
Lid geworden
29 jun 2020
Berichten
35
Hallo,

Ik ben nu al een tijdje aan het stoeien met Excel en het volgende krijg ik niet voor elkaar.
In een cel wil ik enkel de mogelijkheid om een datum in te voeren. Deze datum mag alleen een maandag zijn. Ik heb zelf al geprobeerd om dit met gegevensvalidatie voor elkaar te krijgen, maar het lukt me niet.

Heeft iemand hier een oplossing voor?
 
Maak eerst een lijst met alle maandagen.
gebruik deze lijst in je gegevensvalidatie.
 
Kan ook met iets als dit (zorg er wel voor dat de cel op een maandag staat voordat je deze code gaat gebruiken, anders loopt je excel vast)

Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1")) Is Nothing Then
On Error Resume Next
     If Weekday(Target.Value) <> vbMonday Then
        MsgBox "Vul een maandag in", vbCritical, "Let op! Verkeerde datum"
        Application.Undo
    End If
End If
End Sub
 
Laatst bewerkt:
Aangezien in Excel een datum noch meer noch minder dan een getal is zal je het met een HALVE oplossing moeten doen.
Je kan om te beginnen al de cel de opmaak 'datum' geven.
En dan kom je er vervolgens met in gegevensvalidatie ("Aangepast") de formule
Code: 
=EN(ISGETAL(A1);WEEKDAG(A1;2)=1)
 
Dank allemaal. Ik heb de oplossing van Engina gebruikt. Dit werkt prima!
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan