datum selecteren

[123biertje]

Goeden middag

Is het mogelijk om als ik op een datum druk in mijn kalender, dat deze datum in bv cel c15 komt

Mvg Henk

 

[HSV]

Hallo Henk,

Dat wordt een hoop programmeerwerk.
Hier staat er al eentje voor je klaar zonder Access te moeten installeren.

 

[123biertje]

datum selectren

Beste Harry

bedankt voor je reactie,
dit is wat ik bedoel, maar is het ook mogelijk dat de kalender op een vaste plaats komt te staan (vast)

zo niet dan nog bedankt

Mvg Henk

 

[HSV]

Hallo Henk,

Zet onderstaande code bij in de module van het form.
Verander de getallen naar de gewenste positie.

Private Sub UserForm_Activate()
   Me.Left = 750
   Me.Top = 10
End Sub

En verander de code in bladmodule Blad1 (Blad1).

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
CalendarFrm.Show[COLOR=#ff0000] 0  'vbmodeless[/COLOR]
Cancel = True
End Sub

 

[123biertje]

Beste Harry

Graag nog iets uitleg, gaat mij iets boven mijn pet
maar bedankt dat je mij te hulp schiet

mvg Henk

 

[HSV]

Druk Alt+F11.
Links staan de Vb-projecten.
Klik op "Formulieren".
Dubbelklik op calendarfrm.
Je ziet nu de kalender; dubbelklik daarop.
Plak nu de code helemaal onderaan in het grote witte vlak.

De andere code met de rode nul staat in moduleblad Blad1 (Blad1); ook te openen met een dubbelklik.

 

[123biertje]

Beste Harry

Ik doe vast wat verkeert, want de kalender verdwijnt elke keer weer bij mij
Heb volgens mij alles gedaan wat jij schreef

mvg Henk

 

[HSV]

Als het verdwenen is, zie je allemaal codes staan.
Plak het bovenaan, onderaan, ertussen, maar niet midden in een een andere code.

 

[123biertje]

goeden morgen

wat ik ook probeer, de kalender blijft niet staan in het werkblad,
wat doe ik verkeerd

henk

 

[Cobbe]

Zo dan?

 

[123biertje]

beste Cobbe

Werkt goed, even na gaan wat ik verkeerd heb gedaan
Bedankt Cobbe en Harry:thumb:

Mvg Henk