J'ai =E9crit une macro qui fait appel au s=E9lecteur pour que=20
l'utilisateur choisisse un fichier. Le code a =E9t=E9 r=E9cup=E9r=E9=20
dans l'aide de word et dont voici un extrait
Set fs =3D CreateObject("Scripting.FileSystemObject")
Dim fd As FileDialog
Set fd =3D Application.FileDialog
(msoFileDialogFilePicker)
Dim vrtSelectedItem As Variant
Le probl=E8me est qu'apr=E8s plusieurs utilisations de la=20
macro le s=E9lecteur ne s'affiche plus mais la macro=20
s'ex=E9cute jusqu'=E0 la fin. Impossible cependant de choisir=20
un fichier.
Si quelqu'un a rencontr=E9 le probl=E8me et sourtout en=20
poss=E8de la solution (ou tout au moins la raison) je suis=20
preneur.=20
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
Anacoluthe
Bonjour !
'Marc' nous a écrit ...
Word XP SP3 + Windows 2000 SP4 J'ai écrit une macro qui fait appel au sélecteur et dont voici un extrait
Set fs = CreateObject("Scripting.FileSystemObject") Dim fd As FileDialog Set fd = Application.FileDialog (msoFileDialogFilePicker) Dim vrtSelectedItem As Variant
Les déclarations des objets c'est bien gentil mais ce n'est peut-être pas ce qui nous aidera à voir ce qui cloche dans votre macro.........
... On recherche macroteur extralucide :-D )))))
Anacoluthe « Les questions qui ne se donnent pas de réponse elles-mêmes en naissant n'obtiennent jamais de réponse. » - Franz KAFKA
Bonjour !
'Marc' nous a écrit ...
Word XP SP3 + Windows 2000 SP4
J'ai écrit une macro qui fait appel au sélecteur
et dont voici un extrait
Set fs = CreateObject("Scripting.FileSystemObject")
Dim fd As FileDialog
Set fd = Application.FileDialog
(msoFileDialogFilePicker)
Dim vrtSelectedItem As Variant
Les déclarations des objets c'est bien gentil mais
ce n'est peut-être pas ce qui nous aidera à voir
ce qui cloche dans votre macro.........
... On recherche macroteur extralucide :-D )))))
Anacoluthe
« Les questions qui ne se donnent pas de réponse
elles-mêmes en naissant n'obtiennent jamais de réponse. »
- Franz KAFKA
Word XP SP3 + Windows 2000 SP4 J'ai écrit une macro qui fait appel au sélecteur et dont voici un extrait
Set fs = CreateObject("Scripting.FileSystemObject") Dim fd As FileDialog Set fd = Application.FileDialog (msoFileDialogFilePicker) Dim vrtSelectedItem As Variant
Les déclarations des objets c'est bien gentil mais ce n'est peut-être pas ce qui nous aidera à voir ce qui cloche dans votre macro.........
... On recherche macroteur extralucide :-D )))))
Anacoluthe « Les questions qui ne se donnent pas de réponse elles-mêmes en naissant n'obtiennent jamais de réponse. » - Franz KAFKA
Geo
Bonjour Anacoluthe
... On recherche macroteur extralucide :-D )))))
J'ai essayé avec Word 2000, mais la propriété FileDialog n'existe pas. Si j'ai à peu près compris : on met ce code (sauf la dernière ligne évidemment) dans une boucle. à chaque passage il demande de choisir un fichier, mais au bout d'un moment il demande plus rien. Évidemment s'il y a une gestion des erreurs ça peut aider à comprendre. On ne peut que supputer.
--
A+
Bonjour Anacoluthe
... On recherche macroteur extralucide :-D )))))
J'ai essayé avec Word 2000, mais la propriété FileDialog n'existe pas.
Si j'ai à peu près compris :
on met ce code (sauf la dernière ligne évidemment) dans une boucle.
à chaque passage il demande de choisir un fichier,
mais au bout d'un moment il demande plus rien.
Évidemment s'il y a une gestion des erreurs ça peut aider à
comprendre.
On ne peut que supputer.
J'ai essayé avec Word 2000, mais la propriété FileDialog n'existe pas. Si j'ai à peu près compris : on met ce code (sauf la dernière ligne évidemment) dans une boucle. à chaque passage il demande de choisir un fichier, mais au bout d'un moment il demande plus rien. Évidemment s'il y a une gestion des erreurs ça peut aider à comprendre. On ne peut que supputer.
--
A+
JièL Goubert
Bonjoir(c) Anacoluthe
Le 25/08/2004 19:45 vous avez écrit ceci :
... On recherche macroteur extralucide :-D )))))
Aprés les macroteurs superfétatoires, c'est une nouvelle mode qui se prépare ? ;-)))))))
-- JièL Extra mais aussi lucide
Bonjoir(c) Anacoluthe
Le 25/08/2004 19:45 vous avez écrit ceci :
... On recherche macroteur extralucide :-D )))))
Aprés les macroteurs superfétatoires, c'est une nouvelle mode qui se prépare
? ;-)))))))
