Utilisation de la boite de dialogue

Résolu
Bella__8 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
Bella__8 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous,

je me suis lancé depuis quelques jours dans l'apprentissage en VB EXCEL.

J'explique mon problème:

Sur une feuille Excel j'ai réalisé un 1 bouton de commande (Contrôle ActiveX) pour pouvoir ouvrir un fichier .CSV de mon PC et de l'insérer dans un nouvel onglet du même classeur.

Pour le moment j'ai fais un enregistrement de macro et j'ai effectué la manipulation manuellement pour ensuite coller le programme de la macro enregistré en fonction du clic sur ce bouton.

Le problème pour cette solution c'est qu'elle me permet d'ouvrir seulement le fichier .CSV spécifié.

Je veux donc passer par la boite de dialogue et pouvoir ouvrir n'importe quel fichier pour, le copier dans un nouvel onglet comme dans ma macro enregistré.

Comment faire?

Merci d'avance pour votre aide.
A voir également:

2 réponses

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

un exemple:

Sub Choix_Fichier()
Dim Fichier As Variant
ChDrive "D" 'Indiquer le lecteur (drive)
ChDir "D:\Nom_Du_Repertoire" 'Indiquer le repertoire ici
'boite dial choix fichier csv
Fichier = Application.GetOpenFilename("(*.csv),*.csv")
' suite du code
'
End Sub
1
Bella__8 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
Parfait tout fonctionne comme je voulais!

Merci pour la rapidité ;)
0