parcour disque dur

R

Roland

Guest

• 10 Juillet 2003

• #2

Salut John

Dir("chemin")

Salut ++

 

Vote positif 0 Vote négatif

J

john

Guest

• 10 Juillet 2003

• #3

Re,

Merci pour ta réponse mais ça marche pas.

Je vais expliquer en détail.

J'ai un USF, dessus j'ai un bouton, quand on clique dessus j'aimerai avoir un boite de dialogue qui s'ouvre, qui me permet de parcourir mon disque dur, de sélectionner un fichier (n'importe lequel) et puis faire OK et que tous les renseignements concernant mon fichier soit dans une variable récupérable dans VBA.

Voilà je pense avoir été plus claire cette fois-ci.

Encore merci d'avance pour vos réponses et qui sait ... peut être la solution.

John

 

Vote positif 0 Vote négatif

J

john

Guest

• 10 Juillet 2003

• #4

re,

Sorry, pas claire..... mais clair.

John

 

Vote positif 0 Vote négatif

S

stef

Guest

• 10 Juillet 2003

• #5

salut

Dim FileToOpen as string

FileToOpen = Application.GetOpenFilename(*.xls), *.xls", , "Choisir le fichier à ouvrir")


voir l'aide pour plus de detail !! ;-)

 

Vote positif 0 Vote négatif

J

john

Guest

• 10 Juillet 2003

• #6

Salut Stef,

Merci pour ces renseignements, je testerai demain car maintenant je quitte le boulot.

Encore merci.

John

PS: je te dis si ça marche demain.

@++++++++

 

Vote positif 0 Vote négatif

S

stef

Guest

• 11 Juillet 2003

• #7

slt :-D c'est Vendredi !!! ;-)

un p'tit truc encore. Suivant l'utilisation que tu en fais il est peut être necessaire de detecter une annulation de l'utilisateur.

Si FileToOpen est 'False---> y'a grosse boulette si tu essaye de l'ouvrir avec Workbooks.Open FileToOpen lol

ca donne ca en gros:

FileToOpen = Application.GetOpenFilename("(*.xls), *.xls", , "Choisir le Transfert.xls à ouvrir")
If FileToOpen = False Then
MsgBox "Opération annulée", vbExclamation
Exit Sub
End If
Workbooks.Open FileToOpen

@+

 

Vote positif 0 Vote négatif

S

stef

Guest

• 11 Juillet 2003

• #8

oups !!


le "Choisir le Transfert.xls à ouvrir" n'a rien a faire là , c'est un copier coller un peu rapide sorry !!

 

Vote positif 0 Vote négatif

J

john

Guest

• 11 Juillet 2003

• #9

Salut Stef,

Merciiiiiiiiiiiiiiiiiiiiiiiiiiiii c'est exactement ce que je voulais.

Bon week end.

John

 

Vote positif 0 Vote négatif