Intégrer l'année automatiquement dans un code

ascal44 · 26 Juin 2009

Bonjour ,
J'ai une macro qui insère une date , je voudrais qu'elle intègre automatiquement l'année actuelle

Code:

Range("D5").Select
    ActiveCell.FormulaR1C1 = "1/1/2009"

Est ce possible de modifier cela ?

JCGL · 26 Juin 2009

Re : Intégrer l'année automatiquement dans un code

Bonjour à tous,

Peux-tu essayer :

Code:

Range("D5") = Format(Date, "yyyy")

A+ à tous

ROGER2327 · 26 Juin 2009

Re : Intégrer l'année automatiquement dans un code

Bonjour

Code:

[COLOR="DarkSlateGray"]   [D5].Value = DateSerial(Year(Now()), 1, 1)[/COLOR]

peut-être ?

ROGER2327

ascal44 · 26 Juin 2009

Re : Intégrer l'année automatiquement dans un code

Merci Roger ,ça marche sans bug

Privacy & Transparency