XL 2013 Modifier l'emplacement du calendrier de Roland M

bbb38

XLDnaute Accro
Bonjour le forum,
Un grand moment d’absence. Je ne trouve plus les lignes de codes à rectifier, pour modifier l’emplacement du calendrier de Roland M (que je trouve super), sur un formulaire.
Sur le fichier ci-joint, je souhaite décaler le calendrier sur la droite, et dans la mesure du possible, que ce dernier soit visible en étant à cheval sur la ListBox1 et la Frame1.
En espérant que mon souhait soit réalisable,
Je vous remercie par avance.
Bonne journée.
Bernard
 

Pièces jointes

  • Calendrier Roland M Test.xlsm
    67.3 KB · Affichages: 48

Roland_M

XLDnaute Barbatruc
bonjour à tous,

je t'ai mis le dernier calendrier car celui que tu avais datait un peu !
à savoir que ce sont les objets contrôles qui sont passés et non les valeurs !
voir ton code simplifié dans userform1
Code:
'----------------------------------------------------------------------------------------------------------------------------
Private Sub DTPDate1_Click() ' Super calendrier de Roland_M
    fmSTD_Calendrier.SelectDateCTRL1 Me, DTPDate1 'ce sont des objets contrôles et non pas des valeurs !
End Sub
'----------------------------------------------------------------------------------------------------------------------------

lien des calendriers:
https://www.excel-downloads.com/threads/date-picker-refuse-de-fonctionner.130232/#post-763811
 

Pièces jointes

  • Calendrier Roland M Test_ModifRol1.xlsm
    89.1 KB · Affichages: 66
Dernière édition:

Jouxte

XLDnaute Occasionnel
Bonjour Roland, le forum,
je suis très intéressé par un calendrier d'aide à la saisie.
Je viens de trouver le calendrier de Roland et je le trouve très abouti.
J'aurais souhaité pouvoir l'ouvrir par un double click dans la colonne 1 de ma feuil1.
j'ai essayé de placer le code suivant qui m'ouvre le userform1 dont la partie supérieure n'est pas visible.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 1 And Target.Count = 1 Then
UserForm1.Show
End If
End Sub

Est-il possible d'arriver directement sur le calendrier en doublecliquant dans mes cellules de la colonne 1 ?

Merci pour ce très beau travail et par avance merci pour vos réponses.
 

Roland_M

XLDnaute Barbatruc
Bonsoir,

peux tu joindre ton classeur ?
avec très précisément l'endroit où tu souhaites avoir le calendrier sur cellule semble t'il !?

car je vois que tu appelles un userform1 qui n'est pas mon calendrier !?
ce qui laisse supposer que tu cliques depuis cet userform le calendrier donc pas sur cellule !?
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 184
Messages
2 086 008
Membres
103 089
dernier inscrit
johnjohn1969