Forum Clubic

Excel, insérer la date courante via un bouton

A la base je sais le faire via la fonction =maintenant() et le format de cellule pour afficher "06/07/2005".

Mais j’aimerais par la même occasion figer cette date, afin qu’elle ne se modifie plus (si j’ouvre demain, il y aura marqué “07/07/2005” et non plus “06/07/2005” ce que je souhaite)

Comment faire?


selection.value = date

grosso-modo ça devrais bien aller ça :slight_smile:

Merci! :clap: :jap:

:jap:

Bonjour
Tout sur la gestion des dates sous excel ici
http://bvrve.club.fr/Astuces_Michel/excel.html#Dates
Cordialement

Bonjour,

Tu crées ton bouton et tu lui attribues le code VBA suivant:

Private Sub CommandButton1_Click()
ActiveCell.FormulaR1C1 = DateValue(Date)
ActiveCell.Offset(1, 0).Range("A1").Select
End Sub

Bonne continuation.