Kalender in cel

[wieter]

Prettig kerstfeest aan allen,

Ik zou in de cellen (F10 : F21) de Calendar1 willen laten verschijnen.

If Target.Cells.Count <>6 Then Exit Sub

Deze regel krijg ik niet juist werkend.
Is er iemand die op kerstdag me toch wil helpen?
mgv Wieter

 

[wieter]

Sorry, ik had het verkeerde bestandje meegestuurd
Hierbij het juiste bestand

 

[danny147]

Beste wieter

Prettig kerstfeest

Zie aangepast bestandje.

Groetjes Danny. :thumb:

 

[danny147]

Beste wieter

Heb bestandje wat opgeschoond, zodat je geen hulpkolommen moet gebruiken zoals M,N en O.
Ook de Voorwaardelijke Opmaak is aangepast.

Groetjes Danny. :thumb:

 

[wieter]

Ik heb de topic goed in de war gestuurd door in de eerste posting een verkeerd bestand mee te sturen.
In mijn probeer-bestandje ( eerste posting) krijg ik het boeltje wel werkend naar mijn zin.
Wanneer ik dit nu toepas in het bestand van de tweede posting (naar keuring) krijg ik met dezelfde code een fout.

Bedankt Roncancio voor de reactie, sorry voor het foute bestandje in de eerste posting

@Danny dit is aan totaal andere aanpak via een userform
Ik zou echter willen dat op de kalender de gewenste datum kan aangeklikt worden en dat deze dan in F10:F21 komt te staan

Eigenlijk zou ik willen dat wat in bestand (kalender in cel) toegepast wordt, in bestand (naar keuring) werkend wordt

groeten Wieter

 

[danny147]

Beste wieter

Zie bestandje

Had de code achter de kalender vergeten te plaatsen

Groetjes Danny. :thumb:

 

[wieter]

Prachtig Danny, precies zoals het moet
Bedankt voor de hulp, nog een prettige kerst
Groeten Wieter

 

[WHER]

Kijk eens of dit werkt zoals je wenst?
Bij het posten nét de reactie van Danny en wieter gemist.

 

[wieter]

@ Danny, ik ontdek nu dat je de voorwaardelijke opmaak ook veranderd hebt, waarvoor mijn dank.

@ Wher, ik krijg nu zelfs 2 oplossingen aangeboden, (zal zeker zijn omdat het kerst is)
Bedankt