Discussion :

[arverne63]

Bonjour,

j'essais de m'inspirer de ce tutoriel : https://heureuxoli.developpez.com/publipostage/#LI paragraphes I-B-5-f. et I-B-6.
J'ai bien réussi à créer le formulaire et le bouton cmdMergeIt, mais lorsque je clique sur ce bouton j'ai cette erreur


qui apparaît (ligne 17 en rouge dans le code)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Sub MergeBM()
Dim wApp As Word.Application
Dim chemin As String
Dim rs As DAO.Recordset
Dim db As DAO.Database
Dim sql As String
sql = "SELECT * from Employés"

Set db = CurrentDb
Set rs = db.OpenRecordset(sql)
Set wApp = New Word.Application
    chemin = CurrentProject.Path
wApp.Visible = True

While Not rs.EOF
With wApp
.Documents.Open (chemin & _\BM Publipostage.doc_)
    .ActiveDocument.Bookmarks("nom").Range.Text = rs.Fields("nom")
    .ActiveDocument.Bookmarks("prenom").Range.Text = rs.Fields("prénom")
    .ActiveDocument.PrintOut
    .ActiveDocument.Close (wdDoNotSaveChanges)
End With
rs.MoveNext
Wend
rs.Close
Set rs = Nothing
db.Close
Set db = Nothing

Set wApp = Nothing
End Sub

Ci jointe la copie d'écran des références cochées.



Merci par avance pour votre aide.

Jean Marc

[tee_grandbois]

bonsoir,
il faut les guillemets " pour délimiter la chaine de caractères et pas le souligné _:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Documents.Open (chemin & "\BM Publipostage.doc")

[arverne63]

Bonsoir,

Merci tee_grandbois,

Çà marche, comme je ne suis pas très doué en visual basic, j'ai fais un copier coller du code du tutoriel.

Bon dimanche.

Jean Marc.

[tee_grandbois]

Çà marche, comme je ne suis pas très doué en visual basic, j'ai fais un copier coller du code du tutoriel.

c'est vrai que le code du tuto contient aussi les soulignés. Probablement une "coquille" du rédacteur.