bonjour a tous
sinon on en fait un très simple ressemblant a celui du #post 1
en mode applicatif (modal ou non modal(voir si dessous explication)) compatible toute version (d'office/windows)(utilisation des api en excel4macro )
copier le module UFcalendrier dans votre projet
dans le module de (la/les) feuille concerné(s) mettre ceci bien sur!! adapter les conditions ligne colonne à votre guise
pour le mode non modal débloquez tout ce qui est vert (en commentaire )
VB:
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
If Target.Count > 1 Then Exit Sub
UFcalendrier.Show '0
Cancel = True
End Sub
'Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'If UFcalendrier.Visible Then Unload UFcalendrier
'End Sub
Voila comme ça tu sera pas dépaysé tu te retrouve avec quasiment le même
les calendriers chez patricktoulon ,c'est a la carte
bonjour a tous
sinon on en fait un très simple ressemblant a celui du #post 1
en mode applicatif (modal ou non modal(voir si dessous explication)) compatible toute version (d'office/windows)(utilisation des api en excel4macro )
copier le module UFcalendrier dans votre projet
dans le module de (la/les) feuille concerné(s) mettre ceci bien sur!! adapter les conditions ligne colonne à votre guise
pour le mode non modal débloquez tout ce qui est vert (en commentaire )
VB:
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
If Target.Count > 1 Then Exit Sub
UFcalendrier.Show '0
Cancel = True
End Sub
'Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'If UFcalendrier.Visible Then Unload UFcalendrier
'End Sub
Voila comme ça tu sera pas dépaysé tu te retrouve avec quasiment le même
les calendriers chez patricktoulon ,c'est a la carte
Bonjour,
J'aimerais utiliser votre UF calendrier dans ce classeur, dans la colonne B, a partir de B2, mais je ne suis pas un expert en code, alors je m'adresse
a vous pour me donner un coup de pouce.
Est-ce possible, et merci d'avance
Scorpio