Affichage des deux derniers chiffre de l'année

Nicko · 6 Février 2005

bonsoir à tous,
J'utilise une varible à laquelle est associé la date du jour

An = Date.

Je voudrais que la valeur de An corresponde au deux derniers chiffre de l'année en cours (ex: An = 05)

idem pour la variable Mois = date !

d'avance merci

Rai · 6 Février 2005

Bonsoir,

Quelquechose du genre
an = Right(Year(Date), 2)
Mois = Right("0" & Month(Date), 2)

devrait te convenir.

Bonne soirée

Rai

FabriceLeManuzien · 6 Février 2005

Bonsoir à tous,

Une solution :

Sub an_et_mois()

Dim an As String, mois As String

an = Format(Year(Date), "yy")
mois = Format(Month(Date), "mm")

End Sub

Fabrice

Affichage des deux derniers chiffre de l'année

Nicko

Guest

Rai

Guest

FabriceLeManuzien

Guest

Discussions similaires