Discussion :

[nesswaffle]

Bonjour à tous,

J'aurai besoin svp d'un petit coup de pouce sur un VBA :
Suite à un publipostage ACCESS ->WORD, je me retrouve avec deux documents Word ouverts (le modele de publipostage, ET le doc fusionné).
Je souhaiterai fermer automatiquement le premier, or le ActiveDocument est le second.

Concretement, j'aimerai savoir s'il est possible en VBA de demander la fermeture du document WORD non actif (sans passer par son nom de document car il n'est jamais le même)

Merci d'avance,
Bonne journée !

[Souriane]

Bonjour!

J'ai trimmé très dur sur cette macro il y a 3 ou 4 ans. J'avais exactement le même problème que toi.

Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
'Met en mémoire le nom du document actuel (le document principal de fusion) 
 
Dim docDP As Document
Set docDP = ActiveDocument
 
'Lance la fusion        
                    With ActiveDocument.MailMerge
                        .Destination = wdSendToNewDocument
                        .SuppressBlankLines = True
                        With .DataSource
                            .FirstRecord = wdDefaultFirstRecord
                            .LastRecord = wdDefaultLastRecord
                        End With
                        .Execute Pause:=False
                    End With
 
 
'Ferme le document principal sans sauvegarder
docDP.Close wdDoNotSaveChanges

En espérant que c'est bien ce que tu souhaitais?

Bonne chance!

Souriane

[Heureux-oli]

Salut,

De manière plus générale, on peut fermer le document que l'on souhaite en passant par son nom.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Documents("Mondoc").Close

Passer par l'index est une autre solution, mais beaucoup plus aléatoire, l'index des documents change à chaque ouverture ou fermeture de document.

[Souriane]

Oui Olivier, mais comme nesswaffles le mentionne, il veut que la macro fonctionne peut importe le nom du fichier...

[Heureux-oli]

Salut Sourianne,

J'ai pas vu dans son post.

Mais comme il adresse le ficher au départ d'Access, il connaît son nom.
On peut même l'affecter à un objet à l'ouverture sans faire référence à ActiveDocument.

[nesswaffle]

Merci bien à tous les deux pour ces réponses !

Ça marche pour mon cas, impeccable