Mise en forme via VBA pour créer TCD

Bonjour,

J'ai une base de donnée avec une liste d'activités dont le temps évolue, je souhaite mettre en forme cette base de donnée dans le but de générer un TCD qui résume l'évolution du temps d'une activité durant l'année 2015.

Voici les soucis que j'ai eu :

• Il y a des " ' " dans chaque cellule du coup les formats sont en texte, pas pratique pour générer le TCD
• Transformer Début, Fin en Mois (Valide au premier jour du mois).
• La bdd comportant plus de 100 000 lignes, il faut que la macro soit rapide d’exécution (ce que je ne sais pas faire )

Merci d'avance

Cordialement,

Bonjour,

Essaie avec ce code :

Sub Macro1()
'macro Dan
Dim Plage as range
Dim i as long
With Sheets("Import bdd")
    col = Cells(1, .Columns.Count).End(xlToLeft).Column
    For i = 1 To col
        Set Plage = Range(.Cells(2, i), .Cells(.Cells(Rows.Count, i).End(xlUp).Row, i))
        Plage.TextToColumns Destination:=.Cells(2, i), DataType:=xlFixedWidth, _
        FieldInfo:=Array(0, i), TrailingMinusNumbers:=True   
    Next
End With
End Sub

Si ok, clique sur le v vert à coté du bouton Editer pour cloturer le fil

Crdlt

Merci Dan