Bonjour,
Je souhaiterais récupérer les données d'un fichier .csv dans un dossier (il faudrait pouvoir choisir n'importe quelle fichier) faire une ou plusieurs macro pour récupérer les données de ce fichier pour après les mettre en forme, pour l'étude.
Je suis très novice en VBA.
Pour le moment, j'arrive à extraire les fichiers du dossier dans une colonne, j'arrive à extraire les données d'un fichier, mais je peux pas choisir le fichier de donner à extraire de la colonne "d'extraction du dossier".
Extraction fichier dossier:
Sub EXTRACT()
Repertoire = "C:\......."
i = 2
Nf = Dir(Repertoire & "\*.*")
Do While Nf <> ""
Cells(i, 1) = Nf
Nf = Dir
i = i + 1
Loop
End Sub
Extraction des données:
Sub sav_data_on_file()
Dim nomvariable
Workbooks.Open FileName:=ThisWorkbook.Path & "\TP36.csv"
nomvariable = Range("D2").Value
Columns("A:A").Copy ThisWorkbook.Sheets(2).Range("A1")
ActiveWorkbook.Close
End Sub
Je souhaiterais à partir du fichier extraction de dossier, double cliquer sur le fichier choisis, extraire les données de ce fichier sans l'ouvrir et les coller dans le 2ème onglets.
Merci pour votre aide.
Bien Cordialement.
Julien