Publipostage En VBA

[Manu13]

Bonjour le Forum et tous mes voeux pour la nouvelle année,

j'essaie depuis deux trois jours d'automatiser un publipostage, malgrès tout les post à ce sujet, je n'ai pas réussi.....

j'ai commencé un code que je n'arrive pas a finaliser, d'ailleurs je ne suis même pas sur de partir dans la bonne direction...

Ce que je cherche à faire c'est le publipostage d'une seule ligne de donnée qui sera ciblé par la cellule active (cellule qui être n'importe où sur la ligne)

Merci pour votre aide

Cordialement,

Manu

 

[JJ1]

Re : Publipostage En VBA

Bonjour,
Pourquoi ne pas envoyer tout simplement les noms-adresses vers Word et faire un mailing?
c'est conçu pour.
Bonne soirée

 

[Manu13]

Re : Publipostage En VBA

Bonjour JJ1,

Je n'ai pas dit que je souhaité faire un mailing
sur un tableau de 1000 lignes voir plus, un seule m'intéresse pour remplir le document.

Cordialement,
manu

 

[Manu13]

Re : Publipostage En VBA

Re,

Sub Publipostage()
Dim CheminModele$, CheminSauvegarde$, R As Range

CheminModele = "c:\MonDossier\Courrier\"
CheminSauvegarde = "c:\Mondossier\Courrier\Client\"
Set R = Cells(ActiveCell.Row, 1).Resize(, 4)
Set WordApp = CreateObject("Word.application")
WordApp.Visible = True
WordApp.Documents.Open Filename:=CheminModele & "Modele Lettre.doc"

For Each X In R.Resize(, 4)
    WordApp.ActiveDocument.Bookmarks(Cells(1, X.Column).Value).Select
    WordApp.Selection.TypeText Text:=Format(X.Value, "@")


'WordApp.ActiveDocument.SaveAs Filename:=CheminSauvegarde & "\" & R.Offset(0, 1) & Format(R.Offset(0, 8), "ddmmyy")



End Sub
[code]

La boucle plante, parceque les colonnes ne se suivent pas, par rapport au signets

dans word je demande Nom,Prénom, CP et Ville
et dans excel nom prénom adresse cp ville

dans cette configuration, il y a seulement les signets nom et prénom qui sont validé aprés la boucle plante

par contre si je retire la colonne adresse, pas de problème tout les signets sont renseignés

et si les données qui m'intéresse commence en colonne J ou autre colonne qu'elle la syntaxe

si vous avez une idée corriger cela, par avance merci

Cordialement,
Manu

edit: Bon j'arrive toujours pas à mettre corectement les balises CODE sorry

 

[tototiti2008]

Re : Publipostage En VBA

Bonjour à tous,

peut-être une piste par là, en utilisant un vrai publipostage...

https://www.excel-downloads.com/threads/declencher-publipostage-word-depuis-excel.125823/

 

[Manu13]

Re : Publipostage En VBA

Bonjour tototiti2008,

Merci pour le lien
j'avais déjà lu ce post et viens de le relire......
mais sans réussite.

bonne soirée