Microsoft 365 figer une date

MICHAEL · 20 Janvier 2023

Bonjour,
lorsque je rentre une valeur en a2 je souhaiterais que la date du jour(aujourd'hui) s'affiche en a1(ctrl automatiquement
et qu'elle reste figée dans le temps.
si quelqu'un peut m'aider........

vgendron · 20 Janvier 2023

bonjour

il faut passer par du code VBA dans l'évènement _change de la feuille
un truc du genre (bah oui. j'ai la flemme de te créer un fichier exemple..et pis. c'est pas à moi de le faire de toute facon)

private sub worksheet_change(target as range)
if target.column=1 then
target.offset(0,1)=format(now,"dd/mm/yyyy")
end if
end sub

Hasco · 20 Janvier 2023

Bonjour,

Le raccourci CTRL+; donne la date du jour dans la cellule sélectionnée.

Cordialement

MICHAEL · 21 Janvier 2023

vgendron à dit:
bonjour

il faut passer par du code VBA dans l'évènement _change de la feuille
un truc du genre (bah oui. j'ai la flemme de te créer un fichier exemple..et pis. c'est pas à moi de le faire de toute facon)

private sub worksheet_change(target as range)
if target.column=1 then
target.offset(0,1)=format(now,"dd/mm/yyyy")
end if
end sub

Private Sub worksheet_change(ByVal target As Range)

If target.Column = 5 Then

target.Offset(0, -1) = Format(Now, "dd/mm/yyyy")

End If

End Sub

est mieux...........

merci de ton aide.

Microsoft 365 figer une date

MICHAEL

XLDnaute Occasionnel

vgendron

XLDnaute Barbatruc

Hasco

XLDnaute Barbatruc

MICHAEL

XLDnaute Occasionnel

Discussions similaires