Datum in userform

[Norman Scheuter]

Hallo,

Ik ben begonnen met het maken van een userform waarin ook een kalender zit. ( nu blauwe knop links boven in werkblad )
Deze kalender wordt geopend na drukken op de knop (drukwerk binnen) de datum zou ik dan graag in het veld ernaast willen.
Ik krijg dat niet voor elkaar...

Kan iemand mij daarmee helpen.

Al vast dank voor jullie hulp.

Gr. Norman

 

[HSV]

UserForm1.TextBox7 = CDate(ThisButton)

 

[sylvester-ponte]

of "selection" overal vervangen door "userform1.textbox7" dan krijg je deze:

 

[Norman Scheuter]

Hoi Silvester en Harry,

Top dank jullie wel.
@ Silvester.

Cel eigenschap heeft Amerikaanse datum m/d/jj
Kan dat ook omgezet worden naar d/m/jj

Gr. Norman

 

[HSV]

Ja, zie mijn bijdrage.

 

[Norman Scheuter]

Hoi HSV,

Waar kan ik deze code invullen.
Ik kan de code van Silvester ook nergens vinden....:shocked:

Gr Norman

 

[HSV]

Achter elke button van je kalender-form.
Dubbelklik daarop en je ziet de code.

 

[Norman Scheuter]

Achter elke button van je kalender-form.
Dubbelklik daarop en je ziet de code.

Thanx..Ik zat te zoeken in de andere userform.
Ik ga weer knutselen :thumb:

 

[Norman Scheuter]

Achter elke button van je kalender-form.
Dubbelklik daarop en je ziet de code.

Top, dank je wel, gelukt.
Ik ga weer verder met het maken van het document.

Gr. Norman

 

[Norman Scheuter]

Ik heb er nu nog 2 buttons onder gezet voor 2 andere data.
Daarnaast staan dan de velden die ik met deze button wil vullen.
Maar door de formule "texstbox7 wordt alleen deze gevuld, ook door de buttons eronder.
Hoe kan ik dat aanpassen?
Moet ik dan 3 kalenders in de Userform zetten?

G. Norman

 

[HSV]

Kijk in de eigenschappen van de "velden" (textbox) welke naam ze hebben.
Gebruik die, bv. Userform1.textbox8

 

[Norman Scheuter]

Kijk in de eigenschappen van de "velden" (textbox) welke naam ze hebben.
Gebruik die, bv. Userform1.textbox8

Dat had ik gedaan, maar dan vult de eerste kalender button meteen de datums in de velden ernaast, met dezelfde datum.
Elk veld naast elke (datum)button moet dan zijn eigen datum hebben.
Voor nu heb ik het opgelost door 3 kalenders te plaatsen in de formulieren (calendarfrm, calendarfrm2 en calendarfrm3), zodat ik elke kalender een eigen textbox kan laten vullen.

Gr. Norman

 

[HSV]

Dat gaat ook met één kalender.
De eerste drie knoppen in de kalender voor je gedaan.

 

[Norman Scheuter]

Hoi Harry,

Afgelopen vrijdag was ik niet op het werk...kon niet reageren.
Ik ga het dadelijk bekijken..
Dank je wel :thumb:

Gr. Norman

 

[Norman Scheuter]

Dat gaat ook met één kalender.
De eerste drie knoppen in de kalender voor je gedaan.

Hoi Harry,

Ik heb je oplossing toegepast, werkt perfect, dank je wel:thumb:

Gr. Norman