OVH Cloud OVH Cloud

Fusion Automatique Word

6 réponses
Avatar
karine77.curfs
Bonjour,
J'ai un document word sur lequel j'opère une fusion automatique grâce
à une macro.
Cette macro est appelée à l'ouverture de Word.
Voici mon problème :
Lors de la fusion, mon document word ouvre un autre document dans
lequel il va y avoir les données de fusion. J'aimerais que ce dernier
document ne s'ouvre pars en taille intermédiaire mais en icône.
Est-ce possible?

Merci

6 réponses

Avatar
AB
Bonsoir,
Inutile de poser ta question plusieurs fois : si personne n'a répondu, c'est
que les grands spécialistes de VBA sont encore à table...
Lorsque tu parles d'icône, est-ce que tu veux dire que ton document soit en
fenêtre réduite ?
Si oui, qu'est-ce que ça donne si tu insères dans ta macro la ligne suivante
:
Windows("Ta Base de Données").WindowState = wdWindowStateMinimize
AB
"Karine" a écrit dans le message de
news:
Bonjour,
J'ai un document word sur lequel j'opère une fusion automatique grâce
à une macro.
Cette macro est appelée à l'ouverture de Word.
Voici mon problème :
Lors de la fusion, mon document word ouvre un autre document dans
lequel il va y avoir les données de fusion. J'aimerais que ce dernier
document ne s'ouvre pars en taille intermédiaire mais en icône.
Est-ce possible?

Merci


Avatar
karine77.curfs
Oui, j'aimerais que mon document soit en fenêtre réduite.
Voici mon code :

With ActiveDocument.MailMerge
.Destination = wdSendToNewDocument
.MailAsAttachment = False
.MailAddressFieldName = ""
.MailSubject = ""
.SuppressBlankLines = True
With .DataSource
.FirstRecord = wdDefaultFirstRecord
.LastRecord = wdDefaultLastRecord
End With
.Application.WindowState = wdWindowStateMinimize
.Execute Pause:=True

Windows("Lettres types1.doc").WindowState wdWindowStateMinimize

Mais cela ne marche toujours pas : ma fenêtre "Lettres type1" s'ouvre
en mode normal puis se réduit comme je lui ai demandé. J'aimerais que
l'étape où elle s'ouvre en mode normal ne se déroule pas.

Comment faire??
"AB" wrote in message news:...
Bonsoir,
Inutile de poser ta question plusieurs fois : si personne n'a répondu, c'est
que les grands spécialistes de VBA sont encore à table...
Lorsque tu parles d'icône, est-ce que tu veux dire que ton document soit en
fenêtre réduite ?
Si oui, qu'est-ce que ça donne si tu insères dans ta macro la ligne suivante
:
Windows("Ta Base de Données").WindowState = wdWindowStateMinimize
AB
"Karine" a écrit dans le message de
news:
Bonjour,
J'ai un document word sur lequel j'opère une fusion automatique grâce
à une macro.
Cette macro est appelée à l'ouverture de Word.
Voici mon problème :
Lors de la fusion, mon document word ouvre un autre document dans
lequel il va y avoir les données de fusion. J'aimerais que ce dernier
document ne s'ouvre pars en taille intermédiaire mais en icône.
Est-ce possible?

Merci




Avatar
AB
Bonjour,
Je ne suis pas un spécialiste du publipostage, ni de VBA. Mais pour que les
vrais spécialistes prennent le relais, il faudrait que ta demande soit plus
claire (pour moi, et n'en prends pas ombrage, elle ne l'est pas).
Le document où se trouvent les données de fusion constitue ta base de
données. Le document "lettres-types1.doc" est le résultat de la fusion.
D'après ce que tu écris, c'est ce dernier document dont tu voudrais qu'il
n'apparaisse pas du tout en mode normal, mais qu'il soit tout de suite
réduit en icône ?
AB
"Karine" a écrit dans le message de
news:
Oui, j'aimerais que mon document soit en fenêtre réduite.
Voici mon code :

With ActiveDocument.MailMerge
.Destination = wdSendToNewDocument
.MailAsAttachment = False
.MailAddressFieldName = ""
.MailSubject = ""
.SuppressBlankLines = True
With .DataSource
.FirstRecord = wdDefaultFirstRecord
.LastRecord = wdDefaultLastRecord
End With
.Application.WindowState = wdWindowStateMinimize
.Execute Pause:=True

Windows("Lettres types1.doc").WindowState > wdWindowStateMinimize

Mais cela ne marche toujours pas : ma fenêtre "Lettres type1" s'ouvre
en mode normal puis se réduit comme je lui ai demandé. J'aimerais que
l'étape où elle s'ouvre en mode normal ne se déroule pas.

Comment faire??
"AB" wrote in message
news:...

Bonsoir,
Inutile de poser ta question plusieurs fois : si personne n'a répondu,
c'est


que les grands spécialistes de VBA sont encore à table...
Lorsque tu parles d'icône, est-ce que tu veux dire que ton document soit
en


fenêtre réduite ?
Si oui, qu'est-ce que ça donne si tu insères dans ta macro la ligne
suivante


:
Windows("Ta Base de Données").WindowState = wdWindowStateMinimize
AB
"Karine" a écrit dans le message de
news:
Bonjour,
J'ai un document word sur lequel j'opère une fusion automatique grâce
à une macro.
Cette macro est appelée à l'ouverture de Word.
Voici mon problème :
Lors de la fusion, mon document word ouvre un autre document dans
lequel il va y avoir les données de fusion. J'aimerais que ce dernier
document ne s'ouvre pars en taille intermédiaire mais en icône.
Est-ce possible?

Merci






Avatar
karine77.curfs
Oui, je voudrais que le document qui contient le résultat de ma fusion
soit ouvert tout de suite en mode "icône".

En fait, je voudrais qu'il soit en mode icône pour qu'il soit
"transparent" à l'utilisateur. Une fois que j'obtiens mon fichier
résultat, je l'envoie directement à l'imprimante.
Avatar
Anacoluthe
Bonjour !

"Karine" nous a écrit ...
Oui, je voudrais que le document qui contient le résultat de ma fusion
soit ouvert tout de suite en mode "icône".
En fait, je voudrais qu'il soit en mode icône pour qu'il soit
"transparent" à l'utilisateur. Une fois que j'obtiens mon fichier
résultat, je l'envoie directement à l'imprimante.


Question bête : pourquoi ne pas rendre invisible tout
le processus de fusion Application.Visible = False
jusqu'à l'impression Application.Visible = True
???
(attention à ne pas laisser d'objets windows dans le code
car si Application est invisible, yapu de windows oeuf corse)

Anacoluthe
« Le mauvais temps semble toujours pire
lorsqu'on le regarde par la fenêtre. »
- John KIERAN

Avatar
karine77.curfs
Merci du tuyau ;-)Ca marche !
Pourquoi chercher compliqué quand on peut faire simple ?!!