parcourir le disque dure

Metmo · 28 Juillet 2003

bonjour,
je recherche un script (si qqu en a un simple sous le coude) pour mettre un bouton parcourir afin d'aller chercher sur le disque un Fichier Txt et récupérer le chemin d'accès au fichier afin de pouvoir travailler dessus.

exemple
Workbooks.OpenText FileName:="SGSN.txt"

"SGSN.txt" est trop restrictif est demande a l'utilisisateur de ouvrir le fichier excel contenant la macro dans le même répertoire que "SGSN.txt"

le bouton parcourir me permettrais d'avoir un chemin complet dynamique.

Merci àceux qui prendront du temps pour me répondre

sousou · 28 Juillet 2003

Il suffit d'utilisé la boite de dialogue integrée d'excel
(Si j'ai compris la question)

Workbook.Open Application.Dialogs(xlDialogOpen).Show

Metmo · 28 Juillet 2003

ouais c un bon début mais je voudrais récupérer après la selection du fichier le path pour l'utilisé dans le code

Workbooks.OpenText FileName:="SGSN.txt", _
DataType:=xlDelimited, Space:=True, other:=True, OtherChar:="-"

sousou · 29 Juillet 2003

Sub test()
Application.Dialogs(xlDialogOpen).Show
Set monfichier = ActiveWorkbook
monchemin = monfichier.Path
MsgBox monchemin
End Sub

parcourir le disque dure

Metmo

Guest

sousou

Guest

Metmo

Guest

sousou

Guest

Discussions similaires