Publipostage et droits !!!

  • Initiateur de la discussion Initiateur de la discussion n3Twork
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

n3Twork

XLDnaute Occasionnel
Bonjour

J'avais demandé lme code du publipostrage il y a qlq temps ceci marche cependant quand je clique sur mon bonton de mon userform et que sa lance word ... j'ai pas la main sur les option du publipostage sous word !! ceci est trés genant !!


Private Sub CmdPubliP_Click()
ActiveWorkbook.Save
Dim DocWord As Word.Document
Dim AppWord As Word.Application

Application.ScreenUpdating = False
Set AppWord = New Word.Application
AppWord.Visible = True

Set DocWord = AppWord.Documents.Open("fichier.doc")

With DocWord.MailMerge
.Destination = wdSendToPrinter
.Destination = wdSendToNewDocument
'.SuppressBlankLines = True
With .DataSource
.FirstRecord = wdDefaultFirstRecord
.LastRecord = wdDefaultLastRecord
End With
'.Execute Pause:=True

End With

Application.ScreenUpdating = True
'DocWord.Close False
'AppWord.Quit
End Sub

si qlq peu m'aider ...

merci
 
Re : Publipostage et droits !!!

Salut n3twork, michel

Pourqoui ne fais tu pas ton publipostage complet avec excel, il suffit simplement de refaire ta feuille word sous excel et avec une macro qui va bien, juste un clic sur un bouton, et c'est tout.
Je m'en sert pour un publipostage pour le boulot, environ 250 noms à ventiler, aucuns problèmes!!
Si ca te dit, je peux t'aider
gex140328@wanadoo.fr
@micalement
 
Re : Publipostage et droits !!!

Bon j'ai reussi a me debrouiller mais cependant j'ai cette macro dans 3 fichier dans 2 elle marche et dans le 3ieme fichier sa me met un message d'erreur dés que je clique dessus ....

" Type defini par l'utilisateur non defini" ... c exatement la meme copie que sur les 2 autre fichier ;s ...
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
5
Affichages
754
R
Réponses
1
Affichages
3 K
B
Réponses
0
Affichages
1 K
BaptisteLH
B
B
  • Question Question
Réponses
0
Affichages
778
BaptisteLH
B
E
Réponses
1
Affichages
2 K
Elevenul
E
Réponses
6
Affichages
3 K
Guicheux
G
I
Réponses
1
Affichages
1 K
I
Réponses
0
Affichages
1 K
Retour