Controle op celinhoud

[Nico1965]

Goedendag allemaal!

Ik zit wat te stoeien met een USERFORM.
Deze USERFORM start automatisch zodra het betreffende tabblad wordt geopend.
Alleen dat automatisch starten is niet meer nodig zodra de betreffende cellen al ingevuld zijn.

Dus, zodra de gevraagde gegevens al ingevuld zijn, dan is het USERFORM niet nodig.
Alleen als de cellen leeg zijn dan moet het USERFORM bij het openen van de worksheet geactiveerd worden.

Volgens mij is het iets simpels, zoals een "if then" routine maar ik weet niet waar en hoe dat moet.

Dank jullie wel alvast.

[Roel1973]

Hoi Nico,

Het is inderdaad een IF...THEN routine die nodig is om jouw uitdaging op te lossen.

De correcte macro luidt:

--------------------
Private Sub Worksheet_Activate()

If IsEmpty(Range("D3").Value) = False _
And IsEmpty(Range("D4").Value) = False _
And IsEmpty(Range("D5").Value) = False Then GoTo Afbreken

Aanmeldform.Show

Afbreken:

End Sub
--------------------

Ik heb dit verwerkt in bijgevoegd bestand. Alleen als de drie verplichte velden al zijn ingevuld (dus niet leeg zijn, oftewel 'IsEmpty = False'), wordt het formulier niet getoond. In dat geval springt de routine namelijk naar 'Afbreken:' en slaat 'Aanmeldform.Show' daardoor over. Zijn echter één of meer velden leeg gelaten, dan wordt het formulier juist wel opgeroepen.

[Nico1965]

@Roel Janssen
Super!
Dit is precies waar ik naar zocht.

Nogmaals bedankt voor de oplossing en ook nog eens snel nadat ik de vraag gesteld had.

[emiel]

Je kan het natuurlijk ook zo doen

[Nico1965]

@Emiel,
Dat is ook een mooie uitbreiding/aanvulling maar voor mijn toepassing een beetje overkill.
Mijn toepassing is een invulformulier die elk persoon los van de ander moet invullen.
Dus de gegevens van overige personen zijn niet relevant voor degene diehet formulier in gaat vullen.
Desalniettemin sla ik jou aanvulling op, ik zie wel mogelijkheden voor toekomstige projectjes.
Waarvoor dank!