ouvrir un fichier csv en vba

Bonjour,

Moi j'ai le même problème que nabelou1 dans cette discussion, Excel ouvre mon fichier csv en format texte quand j'utilise une macro ...
Problème résolu pour lui mais moi mon fichier csv est variable, l'utilisateur doit séléctionner auparavant le fichier comme vous pouvez le voir dans mon code :

Code:

---

1 2 3 4 5 6 7

' on affche la boite de dialogue filetoopen = Application.GetOpenFilename("Fichiers texte , *.csv; *.txt", 2, Title, MultiSelect)   'exemple : filetoopen = C:/file/exemple.csv   ' Pour ouvrir , le fichier : Workbooks.Open Filename:=filetoopen

---

Comment je peux changer mon extension de fichier en txt lorsque mon fichier est une variable (ici : filetoopen)?

Merci d'avance du coup de main

Pour ma part j'utilise une autre syntaxe pour ouvrir un txt (ou csv...)

Code:

---

1 2 3 4 5

Rep = "D:\Rep à moi\" 'NomFich = Fichier.txt ou Fichier.csv Workbooks.OpenText Filename:=Rep & NomFich, DataType:=xlDelimited, _ Tab:=False, Semicolon:=True

---

où semicolon signifie que les séparateurs seront des ";"