OVH Cloud OVH Cloud

boite dialogue ouvrir en vba

4 réponses
Avatar
Daniel
Bonjour à tous le groupe!

Je souhaite un code vba qui m'ouvre la boite de dialogue ouvrir dans le
répertoire que je souhaite!

J'utilise ce code mais il ne marche pas et me met par defaut sur le
repertoire mes documents ????

ChDir ("F:\UTILITAIRE\CHOIX")
Application.Dialogs(xlDialogOpen).Show

Pourqui que ça marche pas ???

4 réponses

Avatar
papou
Bonjour
Probablement parce que tu n'es pas sur le lecteur F à l'origine donc tu peux
essayer :
ChDrive "F"
ChDir ("F:UTILITAIRECHOIX")

Cordialement
Pascal

"Daniel" a écrit dans le message de
news:
Bonjour à tous le groupe!

Je souhaite un code vba qui m'ouvre la boite de dialogue ouvrir dans le
répertoire que je souhaite!

J'utilise ce code mais il ne marche pas et me met par defaut sur le
repertoire mes documents ????

ChDir ("F:UTILITAIRECHOIX")
Application.Dialogs(xlDialogOpen).Show

Pourqui que ça marche pas ???




Avatar
Daniel
Oh que c'est joli!!!! C'était ça !

Merci beaucoup papou !




Bonjour
Probablement parce que tu n'es pas sur le lecteur F à l'origine donc tu peux
essayer :
ChDrive "F"
ChDir ("F:UTILITAIRECHOIX")

Cordialement
Pascal

"Daniel" a écrit dans le message de
news:
Bonjour à tous le groupe!

Je souhaite un code vba qui m'ouvre la boite de dialogue ouvrir dans le
répertoire que je souhaite!

J'utilise ce code mais il ne marche pas et me met par defaut sur le
repertoire mes documents ????

ChDir ("F:UTILITAIRECHOIX")
Application.Dialogs(xlDialogOpen).Show

Pourqui que ça marche pas ???









Avatar
Alain CROS
Bonjour.

En une seule ligne...

Application.Dialogs(xlDialogOpen).Show "F:UTILITAIRECHOIX"

Alain CROS


"Daniel" a écrit dans le message de news:
| Oh que c'est joli!!!! C'était ça !
|
| Merci beaucoup papou !
|
|
|
|
| > Bonjour
| > Probablement parce que tu n'es pas sur le lecteur F à l'origine donc tu peux
| > essayer :
| > ChDrive "F"
| > ChDir ("F:UTILITAIRECHOIX")
| >
| > Cordialement
| > Pascal
| >
| > "Daniel" a écrit dans le message de
| > news:
| > > Bonjour à tous le groupe!
| > >
| > > Je souhaite un code vba qui m'ouvre la boite de dialogue ouvrir dans le
| > > répertoire que je souhaite!
| > >
| > > J'utilise ce code mais il ne marche pas et me met par defaut sur le
| > > repertoire mes documents ????
| > >
| > > ChDir ("F:UTILITAIRECHOIX")
| > > Application.Dialogs(xlDialogOpen).Show
| > >
| > > Pourqui que ça marche pas ???
| > >
| > >
| >
| >
| >
Avatar
papou
Bonjour Alain
Oui effectivement c'est une bonne idée de rappeler que certains arguments
sont possibles !
Pour Daniel, voici les arguments pouvant être renseignés pour xlDialogOpen :
file_text, update_links, read_only, format, prot_pwd, write_res_pwd,
ignore_rorec, file_origin, custom_delimit, add_logical, editable,
file_access, notify_logical, converter

Cordialement
Pascal

"Alain CROS" a écrit dans le message de
news:
Bonjour.

En une seule ligne...

Application.Dialogs(xlDialogOpen).Show "F:UTILITAIRECHOIX"

Alain CROS


"Daniel" a écrit dans le message de
news:

| Oh que c'est joli!!!! C'était ça !
|
| Merci beaucoup papou !
|
|
|
|
| > Bonjour
| > Probablement parce que tu n'es pas sur le lecteur F à l'origine donc
tu peux

| > essayer :
| > ChDrive "F"
| > ChDir ("F:UTILITAIRECHOIX")
| >
| > Cordialement
| > Pascal
| >
| > "Daniel" a écrit dans le message de
| > news:
| > > Bonjour à tous le groupe!
| > >
| > > Je souhaite un code vba qui m'ouvre la boite de dialogue ouvrir dans
le

| > > répertoire que je souhaite!
| > >
| > > J'utilise ce code mais il ne marche pas et me met par defaut sur le
| > > repertoire mes documents ????
| > >
| > > ChDir ("F:UTILITAIRECHOIX")
| > > Application.Dialogs(xlDialogOpen).Show
| > >
| > > Pourqui que ça marche pas ???
| > >
| > >
| >
| >
| >