olivier_bahrein
XLDnaute Junior
Bonjour,
Lorsque je clique sur une cellule de feuil1, je crée un évènement qui ouvre un userform (contenant un contrôle calendrier), ce qui me permet de choisir une date.
Je souhaiterais que la date (objetcalendrier.value) se mette dans la cellule qui a appelé le userform. (sur la feuil1 j'ai plusieurs cellule au format date qui doivent être remplies).
Pour cela, j'ai mis le code suivant dans le userform contenant le calendier lorsque je clique sur ok:
Private Sub BtOk_Click()
Feuil1.ActiveCell.Value = ObjCalendrier.Value
FmCalendrier.Hide
End Sub
Mais la référence à la cellule active (ActiveCell) de feuille1 ne fonctionne pas. Pourquoi ?
Comment corriger ?
Merci,
Olivier./.
Lorsque je clique sur une cellule de feuil1, je crée un évènement qui ouvre un userform (contenant un contrôle calendrier), ce qui me permet de choisir une date.
Je souhaiterais que la date (objetcalendrier.value) se mette dans la cellule qui a appelé le userform. (sur la feuil1 j'ai plusieurs cellule au format date qui doivent être remplies).
Pour cela, j'ai mis le code suivant dans le userform contenant le calendier lorsque je clique sur ok:
Private Sub BtOk_Click()
Feuil1.ActiveCell.Value = ObjCalendrier.Value
FmCalendrier.Hide
End Sub
Mais la référence à la cellule active (ActiveCell) de feuille1 ne fonctionne pas. Pourquoi ?
Comment corriger ?
Merci,
Olivier./.