Salut a tous,
Voila une macro pour ouvrir mon fichier CSV a partir de VBA:
J'aimerais pouvoir récupérer les données de ce fichier qui vient de s'ouvrir, avec une ligne du style:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Sub NomFic = Application.GetOpenFilename(, , "Extractions Données") If NomFic <> False Then Workbooks.OpenText Filename:=NomFic, DataType:=1, Semicolon:=True, local:=True End If End Sub
... Mais cela ne marche pas, c'est au niveau du NomFic
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Woorkbook(NomFic).Worksheets(1).Range("A1:AA10).Select Selction.copy
En réalité, j'aurais besoin de copier les données du CSV pour les Coller dans mon XLS.
Quelqu'un aurait il la syntaxe correct pour le fichier CSV dans VBA.
Merci
Partager