Discussion :

[aziz1015]

Bonjour,

J'ai un problème avec un fichier que j'extrais, il a les formats des colonnes qui vont dans tous les sens et pour une raison que j'ignore, je n'arrive pas à changer les formats. Mon but étant de les changer manuellement en utlisant l'enregistreur de Macros pour obtenir un bout de code. J'arrive à les changer mais le résultat ne change pas dans les cellules, je vous montre un exemple dans l'imprim écran.

Quelqu'un saurait pourquoi ?



Merci d'avance pour votre aide

[aziz1015]

Re,

J'ai réussi à modofier par vba, par contre le format ne s'applique pas à toutes les cellules, j'ai procédé comme suit :

Code :

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

1
2
3
4
5
6
7
8
 
 
With Ws
           Set a = Nothing: Set a = .Rows(1).Find("Date d'effet", , xlValues, xlWhole)
           For i = Nbl To -1
                   .Cells(i, a.Column).Value = Format(.Cells(i, a.Column).Value, "yyyy-mm-dd")
           Next i
End With

Certaines cellules ont le format du code et d'autres, ont le format "mm/dd/yyyy" ! Comment corriger cela ?

Merci pour votre aide

[parmi]

Bonjour,

Je ne vois pas comment ton code peut fonctionner avec

For i = Nbl To -1

La ligne 0 n'existe pas sous Excel, encore moins la -1...
Ce serait plutôt

Code :

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

For i = 2 to Nbl

Et ce, en autant que Nbl ait une valeur appropriée...