J'ai une macro en vb excel qui me permet de fusionner une base de données
excel avec un fichier word. Une fois la fusion terminé un nouveau document
est créé grace à la commande suivante:
With .MailMerge
.Destination = wdSendToNewDocument
With .DataSource
.FirstRecord = 1
.LastRecord = 1
End With
.Execute Pause:=False
End With
Jusque là aucun problème et ça fonctionne bien. Cependant, après cette
étape, je voudrais que la boîte de dialogue standard de word pour enregistrer
sous le nouveau document créé affiche et que l'utilisateur puisse ainsi
sélectionner l'emplacement où il veut enregistrer le nouveau document et le
nom qu'il veut lui donner ou encore annuler s'il ne veut pas enregistrer le
nouveau document.
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
Geo
je voudrais que la boîte de dialogue standard de word pour enregistrer sous le nouveau document créé affiche et que l'utilisateur puisse ainsi sélectionner l'emplacement où il veut enregistrer le nouveau document et le nom qu'il veut lui donner ou encore annuler s'il ne veut pas enregistrer le nouveau document.
With dialogs(wdDialogFileSaveAs) .name = "proposition de nom.doc" R = .Show ' R = 0 si "Annuler" End With
-- A+
je voudrais que la boîte de dialogue standard de word pour enregistrer
sous le nouveau document créé affiche et que l'utilisateur puisse ainsi
sélectionner l'emplacement où il veut enregistrer le nouveau document et le
nom qu'il veut lui donner ou encore annuler s'il ne veut pas enregistrer le
nouveau document.
With dialogs(wdDialogFileSaveAs)
.name = "proposition de nom.doc"
R = .Show ' R = 0 si "Annuler"
End With
je voudrais que la boîte de dialogue standard de word pour enregistrer sous le nouveau document créé affiche et que l'utilisateur puisse ainsi sélectionner l'emplacement où il veut enregistrer le nouveau document et le nom qu'il veut lui donner ou encore annuler s'il ne veut pas enregistrer le nouveau document.
With dialogs(wdDialogFileSaveAs) .name = "proposition de nom.doc" R = .Show ' R = 0 si "Annuler" End With
-- A+
Gen
Bonjour,
Dialogs ne semble pas être géré lorsqu'il est intégré dans une macro excel ?
Merci !
je voudrais que la boîte de dialogue standard de word pour enregistrer sous le nouveau document créé affiche et que l'utilisateur puisse ainsi sélectionner l'emplacement où il veut enregistrer le nouveau document et le nom qu'il veut lui donner ou encore annuler s'il ne veut pas enregistrer le nouveau document.
With dialogs(wdDialogFileSaveAs) .name = "proposition de nom.doc" R = .Show ' R = 0 si "Annuler" End With
-- A+
Bonjour,
Dialogs ne semble pas être géré lorsqu'il est intégré dans une macro excel ?
Merci !
je voudrais que la boîte de dialogue standard de word pour enregistrer
sous le nouveau document créé affiche et que l'utilisateur puisse ainsi
sélectionner l'emplacement où il veut enregistrer le nouveau document et le
nom qu'il veut lui donner ou encore annuler s'il ne veut pas enregistrer le
nouveau document.
With dialogs(wdDialogFileSaveAs)
.name = "proposition de nom.doc"
R = .Show ' R = 0 si "Annuler"
End With
Dialogs ne semble pas être géré lorsqu'il est intégré dans une macro excel ?
Merci !
je voudrais que la boîte de dialogue standard de word pour enregistrer sous le nouveau document créé affiche et que l'utilisateur puisse ainsi sélectionner l'emplacement où il veut enregistrer le nouveau document et le nom qu'il veut lui donner ou encore annuler s'il ne veut pas enregistrer le nouveau document.
With dialogs(wdDialogFileSaveAs) .name = "proposition de nom.doc" R = .Show ' R = 0 si "Annuler" End With
-- A+
Geo
Bonjour,
Dialogs ne semble pas être géré lorsqu'il est intégré dans une macro excel ?
Il faut toutes les données pour résoudre un problème. Je n'avais pas fait le lien avec votre précédent message auquel vous n'avez pas donné suite.
Donc : With AppWord.dialogs(wdDialogFileSaveAs)
-- A+
Bonjour,
Dialogs ne semble pas être géré lorsqu'il est intégré dans une macro excel ?
Il faut toutes les données pour résoudre un problème.
Je n'avais pas fait le lien avec votre précédent message auquel vous
n'avez pas donné suite.