Pages

XL 2010 [RESOLU] Format date pour nuage de points sujet

jeudi 30 janvier 2014




Bonjour à tous

Pour tracer un graphique en fonction du temps, je dois avoir en abscisse des dates.
Au départ la colonne de date est sous la forme MM/JJ/AA, j'ai réussi à la modifier pour obtenir ce format JJ/MM/AAAA grâce à ce code:


Code :


Dim tmp As String
    Dim tmpBis As String
    Dim tmpFin As String
    Dim Annee As String

For boucle = 2 To i

        tmp = Left(Cells(boucle, 1), 2)
        tmpBis = Mid(Cells(boucle, 1), 4, 2)
        tmpFin = Right(Cells(boucle, 1), 2)
        Cells(boucle, 1).Value = tmpBis & "/" & tmp & "/" & Annee & tmpFin
   
    Next boucle



Puis je fais ça pour définir tout ça en date:


Code :


 Range("A2:A" & i).Select
    Selection.NumberFormat = "m/d/yyyy"
    Range("A2").Select



Mais en traçant le graphique, je n'ai pas de dates en abscisse mais des nombres : 500,1000 etc...


Comment faire pour résoudre cela??

Merci d'avance,




Aucun commentaire:

Enregistrer un commentaire