j’ai effectué du code VB ‘simple’ pour exécuter (par une macro)
la publication d’une fusion
avec le code
With myMerge
.Destination = wdSendToPrinter
.SuppressBlankLines = True
.Execute
End With
ce code est dans une macro, en normal.dot
il marche pour une fusion X
il ne marche pas pour le meme type de fusion Y (une autre liste)
l’erreur est
5535:
impossible de fusionner ces fichiers ou d’inserer cette base de données.
principe:
j’ai deux publipostages
j’ai deux sources (liste excel)
j’ai deux .doc de fusion
j’ai une macro (bouton mis dans le menu de Word) qui fait
le publipostage sur l’imprimante directement:
code macro:
Set myMerge = ActiveDocument.MailMerge
If myMerge.State = wdMainAndSourceAndHeader Or _
myMerge.State = wdMainAndDataSource Then
With myMerge.DataSource
.FirstRecord = wdDefaultFirstRecord
.LastRecord = wdDefaultLastRecord
End With
End If
With myMerge
.Destination = wdSendToPrinter
.SuppressBlankLines = True
.Execute
'.Check
End With
*** ce code marche pour la premiere fusion, pas pour la deuxième
le debug s’arrete sur l’Execute.
merci de votre aide