Discussion :

[VBBBA]

Bonjour à tous

j'essaye de récuperer dans une cellule l'année en cours au format aa

de la même manière je veux recuperer les numéros du mois en cours ; du mois anterieur et du mois suivant


année en cours 07
exemple mois en cours 06
mois anterieur 05
mois suivant 07

il y'a plein d'exemples sur le forum mais j'arrive pas à trouver réponse à mes questions

Je vous remercie d'avance pour vos réponses

[random]

année en cours

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
year(date())-2000
 
ou 
format(date();"YY")

mois en cours

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
month(date())-2000
ou 
format(date(),"mm")

mois anterieur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
month(dateserial(year(date()),month(date())-1,10))
ou
format(dateserial(year(date()),month(date())-1,10),"mm")

[VBBBA]

Format(Date, "YY") me renvoie 00!! j'avais deja essayé cette formule mais ca m'affiche 0

Pourquoi à votre avis cette mehode ne marche pas

Ce que jessaye de recuperer c'est tou simplement

07 pour l'année en cours
06 pour le mois en cours
05 pour le mois anterieur
et 07 pour le mois suivant


bizarement pour Month(DateSerial(Year(Date), Month(Date) - 1, 10)) par exemple j'ai 00 qui se colle sur ma cellule et le contenu est 05/01/1900

[AlainTech]

Format(Date, "YY") me renvoie 00!!

N'aurais-tu pas une variable qui s'appelle Date, par hasard?

[VBBBA]

Aucune de mes variables s'appele Date.

Je donne juste un exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
 
Public Sub aa()
Dim m As String
Cells(3, 4).Value = Format(Date, "YY")
End Sub

Ca me renvoie 00 dans la cellule et le contenue est "07/01/1900" !!

Alors que je veux juste recuperer 07 au format stondard

[flo_flo]

Chez moi ton code me renvoie 7...

[wilfried_42]

bonjour à tous

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    Cells(3, 4).Value = Year(Date) Mod 100
    Cells(3, 4).NumberFormat = "00"

salutations