boite de dialogue open

sarrsouraa · 3 Août 2010

Bonjour tout le monde

dans ce petit code j'affiche la boite de dialogue open afin que l'utilisateur me selectionne un fichier:

Sub test()
Dim MonFichier
QuelFichier = Application.GetOpenFilename()
MsgBox QuelFichier
End Sub

ya t'il un moyen de mettre un chemein par défaut

merciiiiiiiiiiiiiiiiiiii

kjin · 3 Août 2010

Re : boite de dialogue open

bonjour,
Il faut changer de rep par défaut auparavant

Code:

Dim MonFichier
ChDir "E:\xxx\xxx..."
QuelFichier = Application.GetOpenFilename()
MsgBox QuelFichier

A+
kjin

sarrsouraa · 3 Août 2010

Re : boite de dialogue open

Merci beaucoup pour ta reponse Kjin

mon chemin par defaut est un lien web alors je recois path incorrect

ChDir "http://spi.cim.local/review/"
quelFichier = Application.GetOpenFilename()

merci pour ton aide

kjin · 3 Août 2010

Re : boite de dialogue open

Re,
alors va falloir être plus clair sur tes intentions...
A+
kjin

sarrsouraa · 3 Août 2010

Re : boite de dialogue open

ce que je veux faire c definir comme chemin \\server\folder\ et afficher la boite de dialogue open

boite de dialogue open

sarrsouraa

XLDnaute Occasionnel

kjin

XLDnaute Barbatruc

sarrsouraa

XLDnaute Occasionnel

kjin

XLDnaute Barbatruc

sarrsouraa

XLDnaute Occasionnel

Discussions similaires