MAJ date/heure exécution macro via bouton d'action

Bonjour à tous,

Je suis novice en VBA. Je suis bloqué sur un problème et malgré mes recherches je reste toujours bloqué...

Je m'explique :
Sur mon fichier Excel j'ai un formulaire. Je voudrais afficher/mettre-à-jour dans une cellule l'heure à laquelle j'ai exécuté pour la derniere fois le bouton d'action d'une macro.

Est ce que quelqu'un aurait une piste ? SVP :)

Bonne journée !

Code:

---

sheets("Feuil1").range("A1")=Now

---

Bonjour,

voir par exemple l'aide VBA de la fonction Now …


__________________________________________________________________________________________

Merci de cliquer sur :plusser: pour chaque message ayant aidé puis sur :resolu: pour clore cette discussion …

Bonjour,

Merci pour vos précédents messages. Malheureusement je suis toujours bloqué....

J'ai pensé à ça :

Code:

---

1 2 3 4

Private Sub MAJ_heure() If 'j'utilise ou je clic sur une macro' Then sheets("Feuil1").range("A1")=Now End If End Sub

---

Comment pourrais-je traduire ce 'j'utilise...' ?

Merci d'avance !

Citation:

---

Envoyé par ivanG

Je voudrais afficher/mettre-à-jour dans une cellule l'heure à laquelle j'ai exécuté pour la derniere fois le bouton d'action d'une macro.

---

Et pourquoi donc pas directement dans le code du bouton d'action ? …

__________________________________________________________________________________________

Merci de cliquer sur :plusser: pour chaque message ayant aidé puis sur :resolu: pour clore cette discussion …

C'est bon j'ai résolu mon problème. Dans mon bouton d'action, j'ai un MsgBox avec une validation sous forme d'un OUI/NON. J'ai donc intégré le code suivant à la suite de celui du bouton d'action :

Code:

---

If Reponse = vbYes Then Sheets("Feuil1").Range("C2") = Now()

---

Merci pour vos réponses ! :D

te prends pas la tête a savegarde la réponse; ceci dit c'est pas grave.

Code:

---

If MsgBox("Mon message", vbYesNo + vbQuestion, "Vous avez un message") = vbYes Then Sheets("Feuil1").Range("C2") = Now()

---