Bonjour à tous,
J'ai ce morceau de code (Word 2003 sous XP Pro) :
Set dlgSaveAs = Application.FileDialog(FileDialogType:=msoFileDialogSaveAs)
With dlgSaveAs
.Title = TITREAPPLI
.InitialFileName = NomFicDoc
.Show
End With
Qd la boîte de dialogue est ouverte, je clique sur le bouton Enregistrer. La
boîte de dialogue se referme, pas de message d'erreur et... pas de fichier
dans le dossier !
Pb. de référence ?
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 !
'Jero' nous a écrit ...
J'ai ce morceau de code (Word 2003 sous XP Pro) : Set dlgSaveAs = Application.FileDialog(FileDialogType:=msoFileDialogSaveAs) With dlgSaveAs .Title = TITREAPPLI .InitialFileName = NomFicDoc .Show End With Qd la boîte de dialogue est ouverte, je clique sur le bouton Enregistrer. La boîte de dialogue se referme, pas de message d'erreur et... pas de fichier dans le dossier ! Pb. de référence ?
Non, vous ne faite que /montrer/ une FileDialog* ( <> Dialog* ! ) Il vous faut encore ajouter après le .Show un .Execute ...... ça marche ?
J'ai ce morceau de code (Word 2003 sous XP Pro) :
Set dlgSaveAs = Application.FileDialog(FileDialogType:=msoFileDialogSaveAs)
With dlgSaveAs
.Title = TITREAPPLI
.InitialFileName = NomFicDoc
.Show
End With
Qd la boîte de dialogue est ouverte, je clique sur le bouton Enregistrer. La
boîte de dialogue se referme, pas de message d'erreur et... pas de fichier
dans le dossier !
Pb. de référence ?
Non, vous ne faite que /montrer/ une FileDialog* ( <> Dialog* ! )
Il vous faut encore ajouter après le .Show un .Execute ......
ça marche ?
J'ai ce morceau de code (Word 2003 sous XP Pro) : Set dlgSaveAs = Application.FileDialog(FileDialogType:=msoFileDialogSaveAs) With dlgSaveAs .Title = TITREAPPLI .InitialFileName = NomFicDoc .Show End With Qd la boîte de dialogue est ouverte, je clique sur le bouton Enregistrer. La boîte de dialogue se referme, pas de message d'erreur et... pas de fichier dans le dossier ! Pb. de référence ?
Non, vous ne faite que /montrer/ une FileDialog* ( <> Dialog* ! ) Il vous faut encore ajouter après le .Show un .Execute ...... ça marche ?
Ok ! ça roule... Merci Jero "Anacoluthe" a écrit dans le message de news: %
Bonjour !
'Jero' nous a écrit ...
J'ai ce morceau de code (Word 2003 sous XP Pro) : Set dlgSaveAs = Application.FileDialog(FileDialogType:=msoFileDialogSaveAs) With dlgSaveAs .Title = TITREAPPLI .InitialFileName = NomFicDoc .Show End With Qd la boîte de dialogue est ouverte, je clique sur le bouton Enregistrer. La boîte de dialogue se referme, pas de message d'erreur et... pas de fichier dans le dossier ! Pb. de référence ?
Non, vous ne faite que /montrer/ une FileDialog* ( <> Dialog* ! ) Il vous faut encore ajouter après le .Show un .Execute ...... ça marche ?
Ok ! ça roule...
Merci
Jero
"Anacoluthe" <nopub_anacoluthe@Ouanadoo.fr> a écrit dans le message de news:
%232GLO2OyEHA.2892@TK2MSFTNGP14.phx.gbl...
Bonjour !
'Jero' nous a écrit ...
J'ai ce morceau de code (Word 2003 sous XP Pro) :
Set dlgSaveAs =
Application.FileDialog(FileDialogType:=msoFileDialogSaveAs)
With dlgSaveAs
.Title = TITREAPPLI
.InitialFileName = NomFicDoc
.Show
End With
Qd la boîte de dialogue est ouverte, je clique sur le bouton Enregistrer.
La boîte de dialogue se referme, pas de message d'erreur et... pas de
fichier dans le dossier !
Pb. de référence ?
Non, vous ne faite que /montrer/ une FileDialog* ( <> Dialog* ! )
Il vous faut encore ajouter après le .Show un .Execute ......
ça marche ?
Ok ! ça roule... Merci Jero "Anacoluthe" a écrit dans le message de news: %
Bonjour !
'Jero' nous a écrit ...
J'ai ce morceau de code (Word 2003 sous XP Pro) : Set dlgSaveAs = Application.FileDialog(FileDialogType:=msoFileDialogSaveAs) With dlgSaveAs .Title = TITREAPPLI .InitialFileName = NomFicDoc .Show End With Qd la boîte de dialogue est ouverte, je clique sur le bouton Enregistrer. La boîte de dialogue se referme, pas de message d'erreur et... pas de fichier dans le dossier ! Pb. de référence ?
Non, vous ne faite que /montrer/ une FileDialog* ( <> Dialog* ! ) Il vous faut encore ajouter après le .Show un .Execute ...... ça marche ?
