Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

date du jour associé à un bouton d'un formulaire

3 réponses
Avatar
ryou
Bonjour,
Est-il possible d'associer la date du jour sur un bouton de
formulaire.Ensuite cette date irait s'inscrire directement dans le tableau
colonne "date de saisie"?
En vous remerciant d'avance.

3 réponses

Avatar
MichDenis
En supposant que tu veuilles inscrire la date dans la première
cellule libre de la colonne A:A

With worksheets("Feuil1") 'tu adaptes le nom de la feuille
.range("A" & .range("A65536").end(xlup)(2).row) = Date
End With


"ryou" a écrit dans le message de groupe de discussion :

Bonjour,
Est-il possible d'associer la date du jour sur un bouton de
formulaire.Ensuite cette date irait s'inscrire directement dans le tableau
colonne "date de saisie"?
En vous remerciant d'avance.
Avatar
patrick Leguet
bonjour,
un début de piste

Private Sub UserForm_Activate()
CommandButton1.Caption = Now
End Sub

Private Sub CommandButton1_Click()
[feuil1!a1] = CommandButton1.Caption
End Sub

cordialement
Patrick


"ryou" a écrit dans le message de news:

Bonjour,
Est-il possible d'associer la date du jour sur un bouton de
formulaire.Ensuite cette date irait s'inscrire directement dans le tableau
colonne "date de saisie"?
En vous remerciant d'avance.



Avatar
ryou
Merci pour vos réponses.
Cdlt
"patrick Leguet" a écrit dans le message de news:
49aa1811$0$5081$
bonjour,
un début de piste

Private Sub UserForm_Activate()
CommandButton1.Caption = Now
End Sub

Private Sub CommandButton1_Click()
[feuil1!a1] = CommandButton1.Caption
End Sub

cordialement
Patrick


"ryou" a écrit dans le message de news:

Bonjour,
Est-il possible d'associer la date du jour sur un bouton de
formulaire.Ensuite cette date irait s'inscrire directement dans le
tableau colonne "date de saisie"?
En vous remerciant d'avance.