affichage automatique de l'année et du mois

Bonjour Rémi,

Choisis la méthode qui te convient :


Private Sub Workbook_Open()

With Worksheets("Feuil1")
.Range("A1") = Format(Month(Date), "MMMM")
.Range("A2") = Year(Date)
'Ou
.Range("A3") = .Range("A1") & " " & .Range("A2")
'OU
.Range("A4") = Format(Month(Date), "MMMM") & _
" " & Year(Date)
End With

End Sub


Salutations!


"Rémi" <info.finziusines@planet.tn> a écrit dans le message de news: OVdNWIj5FHA.3384@TK2MSFTNGP11.phx.gbl...
bonsoir tout le monde,
je souhaiterais pouvoir afficher automatiquement par un Workbook_Open()
l'année en cours et le mois en cours soit dans une même cellule soit dans
deux cellules différentes.
quelqu'un aurait-il la solution ?
merci d'avance
Rémi

Bonsoir Rémi,

Par exemple :

Range("A1") = Format(Now, "mmmm") & " " & Year(Now)

bonsoir tout le monde,
je souhaiterais pouvoir afficher automatiquement par un Workbook_Open()
l'année en cours et le mois en cours soit dans une même cellule soit dans
deux cellules différentes.
quelqu'un aurait-il la solution ?
merci d'avance
Rémi

--
Cordialement,

Jacques.

Bonsoir Rémi,
Peut-être pas besoin de macro là-dedans :
en A1, =annee(maintenant())
en A2, =mois(maintenant())
ou en A1 =annee(maintenant())&"/"&mois(maintenant())
Si tu veux vraiment du VBA,
Sub toto()
[a1] = Year(Now())
[a2] = Month(Now())
End Sub

@+ thierryp

bonsoir tout le monde,
je souhaiterais pouvoir afficher automatiquement par un Workbook_Open()
l'année en cours et le mois en cours soit dans une même cellule soit dans
deux cellules différentes.
quelqu'un aurait-il la solution ?
merci d'avance
Rémi