Discussion :

[pontoise]

Bonjour,
Je voudrais récupérer le mois d'une date sur 2 caractères, mais mon code me le sort sur un seul caractère. Autrement dit, pour une date du 18/02/2008, il me sort 2 au lieu de "02".
Mon code est :

Code :

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

ActiveCell.Offset(2, 0) = Month(I62)

Merci par avance pour votre aide.

[ucfoutu]

Code :

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

MsgBox Format(Month(Now), "00")

[Godzestla]

Allez oups, c'est facile, dis !!!

Es-tu certain(e) d'avoir cherché ?

Code :

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

1
2
3
4
5
6
 
if Month(I62) > 9 then
   ActiveCell.Offset(2, 0) = Month(I62)
 else
   ActiveCell.Offset(2, 0) = "0" & Month(I62)
endif

[pontoise]

Justement, quand j'ai exéciuté ton code, il me sort 08, mais quand je l'applique sur I62 MsgBox Format(Month(I62), "00"), il me sort "12" alors que j'ai une date de "01/02/2008". .
Pourtant, j'ai bien un format jj/mm/aaaa.
Et donc, même avec le test (ta 2 ème proposition), il me sort pas 02 parce qu'il considère que c'est le mois 12.
As-tu des pistes STP?

Merci encore une fois.

[ucfoutu]

Travaille donc sur te texte (en format string) du contenu de ta cellule ...

ensuite :

Code :

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

1
2
3
Dim toto As String
  toto = "01/02/2008"
  MsgBox Format(Month(toto), "00")

[Godzestla]

Que valent ?

I62 ?

Month(I62) ?

[pontoise]

Il s'agissait en effet d'un problème de format de celulle, il a fallut le mettre en format date et réecrire dans la celulle.
Merci.