[RESOLU] Import fichier CSV, chemin à parcourir

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

richert90

XLDnaute Occasionnel
Bonjour à tous,

J'ai enregistré une macro permettant d'importer un fichier CSV sur Excel, mais j'aimerais avoir un code me permettant de choisir un fichier .CSV dans n'importe quelle dossier (il faut juste que la condition soit le format du fichier: . CSV) : voici le début du code, qui pose soucis:

Code:
 With ActiveSheet.QueryTables.Add(Connection:= _
        "TEXT;C:\Documents and Settings\Mes documents\Mes sources de données\Importer fichier CSV sur Excel\carnet_adresse.CSV" _
        , Destination:=Range("$A$1"))
        .Name = "carnet_adresse"
        .FieldNames = True

etc....

Ici je sais quel est le nom du fichier et où il se situe mais j'aimerais laisser l'utilisateur aller chercher ce fichier CSV où il veut (avec un petite fenêtre parcourir par exemple qui lui permettra d'aller chercher ce fichier .CSV)
Ensuite une variable récupérera le chemin parcouru pour accéder au fichier et je mettrai cet variable dans le code de la macro ci dessus. (idem pour le nom du fichier CSV à importer).

Quelqu'un à une idée pour réaliser cela ??

Merci d'avance de votre aide;
 
Dernière édition:
Re : Import fichier CSV, chemin à parcourir

Merci DranReb pour ta réponse, le GetOpenFileName marche bien 😉

Juste une autre question : comment fait -on à partir d'un chemin pour avoir juste le nom du fichier sans son extension

Par exemple dans le cas précédent:
Code:
"C:\Documents and Settings\Mes documents\Mes sources de données\Importer fichier CSV sur Excel\carnet_adresse.CSV"

Je voudrais savoir s'il existe une fonction ou un code me permettant d'avoir seulement
Code:
carnet_adresse

Merci d'avance
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Microsoft 365 CSV en EXCEL
Réponses
1
Affichages
98
Réponses
40
Affichages
2 K
Retour