Bouton Excel pour publipostage

Bonjour,

j'ai créé un bouton excel afin d'ouvrir le fichier word (lettre publipostage) mais j'ai systématiquement des erreurs.

étant novice dans ce domaine je fais appel à votre aide en PJ les documents

Merci par avance

Cordialement

Bonjour

Créer sur excel 2010 mais j'espère que ça fonctionne aussi sur excel 2007. Nécessite l'activation de la référence "Microsoft Word xx.x Object Library"

Sinon le code à adapter

Sub DocWord()
  Dim oDoc As Word.Document
  Dim wChemin$, DocWord$, req$, cl$, nomEleve$
  Dim wordApp As Object

  wChemin = ThisWorkbook.Path & "\" ' Chemin reletif vers le fichier

  Set wordApp = CreateObject("word.Application") ' Création d'une instance de word
  wordApp.Visible = True: wordApp.Activate 'Activation de la fenêtre Word

  DocWord = "lettre-publipostage.doc" ' Nom du document à ouvrir
  Set oDoc = wordApp.Documents.Open(wChemin & DocWord) ' Ouverture du document

' Le traitement à faire
' ***************************************
  'Lien vers la base et autres
  '
  '
' ***************************************

  oDoc.Close SaveChanges:=wdDoNotSaveChanges ' Fermeture sans sauvegarde du document
  wordApp.Quit SaveChanges:=wdDoNotSaveChanges 'Fermeture de l'instance de Word
  Set wordApp = Nothing ' Libération de la mémoire

End Sub

Bonne chance

Bonjour,

merci de votre aide.

Mais comme je suis novice je rencontre un nouveau problème : "projet ou bibliothèque introuvable"

en PJ la capture d'écran si vous pouvez m'aider

Merci par avance

bonne soirée

Commencez par décocher La réference marquée manquante

Sur votre version d'excel ce n'est peut être pas Microsoft Word 14.0. Cherchez dans la liste si vous trouvez une autre version de Microsoft Word XX.x Library.

Bonjour,

merci pour votre aide mais le fichier word s'affiche vierge. Un nouveau problème : erreur d’exécution 13 incompatibilité de type.

je joins les fichiers

Merci encore pour votre aide précieuse

Cordialement

Bonjour

Voici une une version qui fonctionne chez moi avec excel 2010 je ne peux pas tester sur le 2007 que je n'ai pas.

J'ai modifie la feuille recrutement pour la rendre opérationnelle. Avec celle d'origine ça me sortait 222 lettres au lieu de 5

Bonjour,

merci beaucoup pour votre aide

je vous souhaite une très belle journée

Bien cordialement