Bonsoir à tous,
Pour saisir des dates dans une colonne, peut-on avoir recours au calendrier
de VBA ? Je m'explique (au cas où...), plutôt que de saisir la date,
j'aimerais que lorsque le pointeur passe sur les cellules d'une colonne
lambda, qu'un calendrier apparaise et que je puisse en sélectionner une date
?
Merci d'avance pour votre aide !
A bientôt
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichDenis
Bonsoir J. Pascal,
Dans le module feuille où tu veux que l'action se déroule, inscrit ceci :
à chaque fois que tu vas cliquer dans une cellule de la colonne 2 de la feuille, le formulaire va s'ouvrir. À toi d'adapte le numéro de la colonne que tu veux !
'-------------------------- Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 2 Then UserForm1.Show End If
End Sub '--------------------------
Et dans le formulaire dans lequel tu as placé le contrôle "Calandar1" tu peux utiliser ceci comme code :
'------------------------------ Private Sub Calendar1_Click()
'Tu appliques le format que tu désires. ActiveCell.NumberFormat = "dd mmm YYYY" ActiveCell = Me.Calendar1.Value
End Sub '------------------------------
Private Sub UserForm_Initialize()
'Ouvre le formulaire avec la date du jour Me.Calendar1.Value = Date
End Sub '------------------------------
Salutations!
"j-pascal" a écrit dans le message de news: Bonsoir à tous, Pour saisir des dates dans une colonne, peut-on avoir recours au calendrier de VBA ? Je m'explique (au cas où...), plutôt que de saisir la date, j'aimerais que lorsque le pointeur passe sur les cellules d'une colonne lambda, qu'un calendrier apparaise et que je puisse en sélectionner une date ? Merci d'avance pour votre aide ! A bientôt
Bonsoir J. Pascal,
Dans le module feuille où tu veux que l'action se déroule, inscrit ceci :
à chaque fois que tu vas cliquer dans une cellule de la colonne 2 de la feuille, le formulaire va s'ouvrir. À toi d'adapte le
numéro de la colonne que tu veux !
'--------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 2 Then
UserForm1.Show
End If
End Sub
'--------------------------
Et dans le formulaire dans lequel tu as placé le contrôle "Calandar1" tu peux utiliser ceci comme code :
'------------------------------
Private Sub Calendar1_Click()
'Tu appliques le format que tu désires.
ActiveCell.NumberFormat = "dd mmm YYYY"
ActiveCell = Me.Calendar1.Value
End Sub
'------------------------------
Private Sub UserForm_Initialize()
'Ouvre le formulaire avec la date du jour
Me.Calendar1.Value = Date
End Sub
'------------------------------
Salutations!
"j-pascal" <nospam-j-pascal@free.fr> a écrit dans le message de news: ejmBDsGQFHA.1268@TK2MSFTNGP14.phx.gbl...
Bonsoir à tous,
Pour saisir des dates dans une colonne, peut-on avoir recours au calendrier
de VBA ? Je m'explique (au cas où...), plutôt que de saisir la date,
j'aimerais que lorsque le pointeur passe sur les cellules d'une colonne
lambda, qu'un calendrier apparaise et que je puisse en sélectionner une date
?
Merci d'avance pour votre aide !
A bientôt
Dans le module feuille où tu veux que l'action se déroule, inscrit ceci :
à chaque fois que tu vas cliquer dans une cellule de la colonne 2 de la feuille, le formulaire va s'ouvrir. À toi d'adapte le numéro de la colonne que tu veux !
'-------------------------- Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 2 Then UserForm1.Show End If
End Sub '--------------------------
Et dans le formulaire dans lequel tu as placé le contrôle "Calandar1" tu peux utiliser ceci comme code :
'------------------------------ Private Sub Calendar1_Click()
'Tu appliques le format que tu désires. ActiveCell.NumberFormat = "dd mmm YYYY" ActiveCell = Me.Calendar1.Value
End Sub '------------------------------
Private Sub UserForm_Initialize()
'Ouvre le formulaire avec la date du jour Me.Calendar1.Value = Date
End Sub '------------------------------
Salutations!
"j-pascal" a écrit dans le message de news: Bonsoir à tous, Pour saisir des dates dans une colonne, peut-on avoir recours au calendrier de VBA ? Je m'explique (au cas où...), plutôt que de saisir la date, j'aimerais que lorsque le pointeur passe sur les cellules d'une colonne lambda, qu'un calendrier apparaise et que je puisse en sélectionner une date ? Merci d'avance pour votre aide ! A bientôt
