Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans un
repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur
mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai
essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
-------------------------------
Sub testrep()
Dim Dlg As FileDialog
Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen)
Dlg.Show
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jacky
Bonsoir,
Un petit coup de F1 sur instruction ChDir
-- Salutations JJ
"Steph" a écrit dans le message de news: 45e46053$0$2937$
Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
------------------------------- Sub testrep() Dim Dlg As FileDialog Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen) Dlg.Show
End Sub -------------------------------
D'avance merci,
Steph
Bonsoir,
Un petit coup de F1 sur instruction
ChDir
--
Salutations
JJ
"Steph" <steph.stommen@skynet.be> a écrit dans le message de news:
45e46053$0$2937$ba620e4c@news.skynet.be...
Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans
un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur
mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai
essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
-------------------------------
Sub testrep()
Dim Dlg As FileDialog
Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen)
Dlg.Show
"Steph" a écrit dans le message de news: 45e46053$0$2937$
Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
------------------------------- Sub testrep() Dim Dlg As FileDialog Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen) Dlg.Show
End Sub -------------------------------
D'avance merci,
Steph
MichDenis
Si tu veux seulement ouvrir une fenêtre pour un répertoire donné, tu peux utiliser ceci en utilisant le chemin que tu désires... cependant, tu ne pourras pas recueillir le ou les fichiers sélectionnés dans une variable... si besoin... tu fais signe
Application.Dialogs(xlDialogOpen).Show "c:Denis"
"Steph" a écrit dans le message de news: 45e46053$0$2937$ Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
------------------------------- Sub testrep() Dim Dlg As FileDialog Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen) Dlg.Show
End Sub -------------------------------
D'avance merci,
Steph
Si tu veux seulement ouvrir une fenêtre pour un répertoire donné,
tu peux utiliser ceci en utilisant le chemin que tu désires...
cependant, tu ne pourras pas recueillir le ou les fichiers
sélectionnés dans une variable... si besoin... tu fais signe
Application.Dialogs(xlDialogOpen).Show "c:Denis"
"Steph" <steph.stommen@skynet.be> a écrit dans le message de news:
45e46053$0$2937$ba620e4c@news.skynet.be...
Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans un
repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur
mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai
essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
-------------------------------
Sub testrep()
Dim Dlg As FileDialog
Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen)
Dlg.Show
Si tu veux seulement ouvrir une fenêtre pour un répertoire donné, tu peux utiliser ceci en utilisant le chemin que tu désires... cependant, tu ne pourras pas recueillir le ou les fichiers sélectionnés dans une variable... si besoin... tu fais signe
Application.Dialogs(xlDialogOpen).Show "c:Denis"
"Steph" a écrit dans le message de news: 45e46053$0$2937$ Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
------------------------------- Sub testrep() Dim Dlg As FileDialog Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen) Dlg.Show
End Sub -------------------------------
D'avance merci,
Steph
MichDenis
M. Jacky, peux-tu me donner un exemple avec Chdir et la méthode suggérée ? Set Dlg = Application.FileDialog(msoFileDialogOpen)
Si c'est pour ouvrir sur un répertoire donné, il devrait plutôt utilser : Set Dlg = Application.FileDialog(msoFileDialogFolderPicker) Dlg.Show et dans ce cas même si tu utilises chdir pour modifier le chemin. ça ne fonctionne pas ...!
C'est pas grave....ça te coûtera seulement une tournée générale lors de votre prochanine rencontre ce printemps ... tu pourras partager la dépense avec JPS !!! ;-))
"Jacky" a écrit dans le message de news: Bonsoir,
Un petit coup de F1 sur instruction ChDir
-- Salutations JJ
"Steph" a écrit dans le message de news: 45e46053$0$2937$
Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
------------------------------- Sub testrep() Dim Dlg As FileDialog Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen) Dlg.Show
End Sub -------------------------------
D'avance merci,
Steph
M. Jacky, peux-tu me donner un exemple avec Chdir
et la méthode suggérée ?
Set Dlg = Application.FileDialog(msoFileDialogOpen)
Si c'est pour ouvrir sur un répertoire donné, il devrait plutôt utilser :
Set Dlg = Application.FileDialog(msoFileDialogFolderPicker)
Dlg.Show
et dans ce cas même si tu utilises chdir pour modifier le chemin.
ça ne fonctionne pas ...!
C'est pas grave....ça te coûtera seulement une tournée générale
lors de votre prochanine rencontre ce printemps ... tu pourras
partager la dépense avec JPS !!! ;-))
"Jacky" <Dupond@dupont.fr> a écrit dans le message de news: OQp6JApWHHA.388@TK2MSFTNGP04.phx.gbl...
Bonsoir,
Un petit coup de F1 sur instruction
ChDir
--
Salutations
JJ
"Steph" <steph.stommen@skynet.be> a écrit dans le message de news:
45e46053$0$2937$ba620e4c@news.skynet.be...
Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans
un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur
mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai
essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
-------------------------------
Sub testrep()
Dim Dlg As FileDialog
Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen)
Dlg.Show
M. Jacky, peux-tu me donner un exemple avec Chdir et la méthode suggérée ? Set Dlg = Application.FileDialog(msoFileDialogOpen)
Si c'est pour ouvrir sur un répertoire donné, il devrait plutôt utilser : Set Dlg = Application.FileDialog(msoFileDialogFolderPicker) Dlg.Show et dans ce cas même si tu utilises chdir pour modifier le chemin. ça ne fonctionne pas ...!
C'est pas grave....ça te coûtera seulement une tournée générale lors de votre prochanine rencontre ce printemps ... tu pourras partager la dépense avec JPS !!! ;-))
"Jacky" a écrit dans le message de news: Bonsoir,
Un petit coup de F1 sur instruction ChDir
-- Salutations JJ
"Steph" a écrit dans le message de news: 45e46053$0$2937$
Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
------------------------------- Sub testrep() Dim Dlg As FileDialog Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen) Dlg.Show
End Sub -------------------------------
D'avance merci,
Steph
Jacky
C'est pas grave....ça te coûtera seulement une tournée générale lors de votre prochanine rencontre ce printemps ... tu pourras partager la dépense avec JPS !!! ;-))
Je suis d'accord, à condition que tu viennes.
M.Jacky ;-))))))))))))
"MichDenis" a écrit dans le message de news:
M. Jacky, peux-tu me donner un exemple avec Chdir et la méthode suggérée ? Set Dlg = Application.FileDialog(msoFileDialogOpen)
Si c'est pour ouvrir sur un répertoire donné, il devrait plutôt utilser : Set Dlg = Application.FileDialog(msoFileDialogFolderPicker) Dlg.Show et dans ce cas même si tu utilises chdir pour modifier le chemin. ça ne fonctionne pas ...!
C'est pas grave....ça te coûtera seulement une tournée générale lors de votre prochanine rencontre ce printemps ... tu pourras partager la dépense avec JPS !!! ;-))
"Jacky" a écrit dans le message de news:
Bonsoir,
Un petit coup de F1 sur instruction ChDir
-- Salutations JJ
"Steph" a écrit dans le message de news: 45e46053$0$2937$
Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
------------------------------- Sub testrep() Dim Dlg As FileDialog Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen) Dlg.Show
End Sub -------------------------------
D'avance merci,
Steph
C'est pas grave....ça te coûtera seulement une tournée générale
lors de votre prochanine rencontre ce printemps ... tu pourras
partager la dépense avec JPS !!! ;-))
Je suis d'accord, à condition que tu viennes.
M.Jacky ;-))))))))))))
"MichDenis" <michdenis@hotmail.com> a écrit dans le message de news:
eFxwokpWHHA.600@TK2MSFTNGP05.phx.gbl...
M. Jacky, peux-tu me donner un exemple avec Chdir
et la méthode suggérée ?
Set Dlg = Application.FileDialog(msoFileDialogOpen)
Si c'est pour ouvrir sur un répertoire donné, il devrait plutôt utilser :
Set Dlg = Application.FileDialog(msoFileDialogFolderPicker)
Dlg.Show
et dans ce cas même si tu utilises chdir pour modifier le chemin.
ça ne fonctionne pas ...!
C'est pas grave....ça te coûtera seulement une tournée générale
lors de votre prochanine rencontre ce printemps ... tu pourras
partager la dépense avec JPS !!! ;-))
"Jacky" <Dupond@dupont.fr> a écrit dans le message de news:
OQp6JApWHHA.388@TK2MSFTNGP04.phx.gbl...
Bonsoir,
Un petit coup de F1 sur instruction
ChDir
--
Salutations
JJ
"Steph" <steph.stommen@skynet.be> a écrit dans le message de news:
45e46053$0$2937$ba620e4c@news.skynet.be...
Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans
un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur
mais je ne trouve pas le moyen de préciser le répertoire d'ouverture,
j'ai
essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
-------------------------------
Sub testrep()
Dim Dlg As FileDialog
Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen)
Dlg.Show
C'est pas grave....ça te coûtera seulement une tournée générale lors de votre prochanine rencontre ce printemps ... tu pourras partager la dépense avec JPS !!! ;-))
Je suis d'accord, à condition que tu viennes.
M.Jacky ;-))))))))))))
"MichDenis" a écrit dans le message de news:
M. Jacky, peux-tu me donner un exemple avec Chdir et la méthode suggérée ? Set Dlg = Application.FileDialog(msoFileDialogOpen)
Si c'est pour ouvrir sur un répertoire donné, il devrait plutôt utilser : Set Dlg = Application.FileDialog(msoFileDialogFolderPicker) Dlg.Show et dans ce cas même si tu utilises chdir pour modifier le chemin. ça ne fonctionne pas ...!
C'est pas grave....ça te coûtera seulement une tournée générale lors de votre prochanine rencontre ce printemps ... tu pourras partager la dépense avec JPS !!! ;-))
"Jacky" a écrit dans le message de news:
Bonsoir,
Un petit coup de F1 sur instruction ChDir
-- Salutations JJ
"Steph" a écrit dans le message de news: 45e46053$0$2937$
Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
------------------------------- Sub testrep() Dim Dlg As FileDialog Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen) Dlg.Show
End Sub -------------------------------
D'avance merci,
Steph
MichDenis
| Je suis d'accord, à condition que tu viennes.
J'attends que cette riche organisation qu'est le C.O.I.N. me fasse parvenir mes billets d'avion !
N'est-elle pas subventionné par Microsoft ?
;-))))
"
| Je suis d'accord, à condition que tu viennes.
J'attends que cette riche organisation qu'est le C.O.I.N.
me fasse parvenir mes billets d'avion !
J'attends que cette riche organisation qu'est le C.O.I.N. me fasse parvenir mes billets d'avion !
N'est-elle pas subventionné par Microsoft ?
;-))))
"
Steph
Merci pour vos renseignements ;-)
"MichDenis" a écrit dans le message de news:
Si tu veux seulement ouvrir une fenêtre pour un répertoire donné, tu peux utiliser ceci en utilisant le chemin que tu désires... cependant, tu ne pourras pas recueillir le ou les fichiers sélectionnés dans une variable... si besoin... tu fais signe
Application.Dialogs(xlDialogOpen).Show "c:Denis"
"Steph" a écrit dans le message de news: 45e46053$0$2937$ Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
------------------------------- Sub testrep() Dim Dlg As FileDialog Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen) Dlg.Show
End Sub -------------------------------
D'avance merci,
Steph
Merci pour vos renseignements ;-)
"MichDenis" <michdenis@hotmail.com> a écrit dans le message de news:
O3CM1gpWHHA.488@TK2MSFTNGP06.phx.gbl...
Si tu veux seulement ouvrir une fenêtre pour un répertoire donné,
tu peux utiliser ceci en utilisant le chemin que tu désires...
cependant, tu ne pourras pas recueillir le ou les fichiers
sélectionnés dans une variable... si besoin... tu fais signe
Application.Dialogs(xlDialogOpen).Show "c:Denis"
"Steph" <steph.stommen@skynet.be> a écrit dans le message de news:
45e46053$0$2937$ba620e4c@news.skynet.be...
Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans
un
repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur
mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai
essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
-------------------------------
Sub testrep()
Dim Dlg As FileDialog
Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen)
Dlg.Show
Si tu veux seulement ouvrir une fenêtre pour un répertoire donné, tu peux utiliser ceci en utilisant le chemin que tu désires... cependant, tu ne pourras pas recueillir le ou les fichiers sélectionnés dans une variable... si besoin... tu fais signe
Application.Dialogs(xlDialogOpen).Show "c:Denis"
"Steph" a écrit dans le message de news: 45e46053$0$2937$ Bonsoir,
Je cherche à ouvrir une fenêtre d'explorateur de fichier directement dans un repertoire bien précis se trouvant dans une variable "Chemin".
Voici ci dessous le code me permettant d'ouvrir une fenêtre d'explorateur mais je ne trouve pas le moyen de préciser le répertoire d'ouverture, j'ai essayer "Dir Chemin" apparement ca ne fonctionne pas.
Sauriez-vous m'aiguiller ?
------------------------------- Sub testrep() Dim Dlg As FileDialog Dim i As Integer
Set Dlg = Application.FileDialog(msoFileDialogOpen) Dlg.Show
