Discussion :

[1pim34]

Bonjour,

Je cherche via une macro vba a transformer le contenu de chaque cellule de la colonne B à partir de la 2nde ligne.
il faut que mes cellules ne contiennent que le mois au lieu de la date entière. Il me faut le numéro du mois (de 1 à 12)

Est ce qu'une âme généreuse veut bien m'aider sur ce code ?

Merci d'avance.

moisdate.xlsx

[BENNASR]

bonjour
sans macro avec

=TEXTE(B2;"m")

si non tu peux tester sur une copie de ton fichier
NB : c'est du bricolage, sans doute il y a des solutions meilleures

Code :

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

1
2
3
4
5
6
7
8
9
Sub Macro1()
Dim F As Worksheet
Set F = Sheets("Feuil1")
For i = 2 To F.Range("B" & Rows.Count).End(xlUp).Row
 M = Mid(F.Cells(i, "B"), 4, 2)
 F.Cells(i, "B") = M
 F.Cells(i, "B").NumberFormat = "0"
 Next i
End Sub

[1pim34]

Super,

merci beaucoup BENNASR ça fonctionne très bien.