prb publipostage access

Question

Bonjour,
je suis sur un publipostage que je souhaite faire sur access via un formulaire et j'ai une erreur sur la fonction ME, je ne la comprends pas.

voici le code que j'utilise :

Sub MergeIt()
Dim objWord As Word.Document
Set objWord = GetObject("C:\Documents and Settings\hchibani\Bureau
oms.doc", "Word.Document")
' Rend Word visible important puisque la fusion se fait à l'écran.
objWord.Application.Visible = True
' Sélectionne .la base de données Comptoir comme source de données pour la fusion
objWord.MailMerge.OpenDataSource _
Name:="C:\Documents and Settings\hchibani\Mes documents\Base de données1.accdb", _
LinkToSource:=True, _
Connection:="essai CDOS", _
SQLStatement:="SELECT * FROM [Publipostage] WHERE [Num] = " & Me.[Num]
' Exécution de la fusion.
objWord.MailMerge.Execute
Set objWord = Nothing
End Sub

c148270 · Answer

Bonjour
Quel est le message d'erreur ?

L'utilisation de Me nécessite que le module soit dans le formulaire ouvert

Bonne journée

Prb publipostage access

1 réponse

Votre réponse

Discussions similaires