Afin d'automatiser l'édition des bulletins de salaires de l'association j'ai
créé les instructions suivantes à partir d'un formulaire sous Word 2000 :
Private Sub CommandButton1_Click()
Dim moispaye As String
'définir une variable moispaye
moispaye = InputBox("Mois de la paye : ex janvier")
' Macro1 Macro
' Macro enregistrée le 07/11/2004
'
Documents.Open FileName:="""C:\ASSOC\Paye\Bulletin salaire sur conv
col.doc""", _
ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False,
_
PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
wdOpenFormatAuto
' Macro2maj_mois Macro
' Macro enregistrée le 07/11/2004
'
MsgBox (moispaye)
' affiche le mois qui a été défini pour vérification
ActiveDocument.MailMerge.DataSource.QueryString = _
"SELECT * FROM C:\ASSOC\Paye\simulation 2004.xls WHERE ((mois =
'novembre' ))" _
& ""
End Sub
L'instruction SELECT ... FROM ...WHERE ci-dessus ressort directement de
l'enregistrement macro de l'aide au publipostage Option de Requete dans
laquelle j'ai écrit novembre
Mon problème est de faire en sorte que après WHERE (( mois = la valeur de
ma variable moispaye définie au tout début.
Pouvez-vous m'aider à formuler correctement cetee condition WHERE
-----Message d'origine----- Afin d'automatiser l'édition des bulletins de salaires de l'association j'ai
créé les instructions suivantes à partir d'un formulaire sous Word 2000 :
Private Sub CommandButton1_Click() Dim moispaye As String 'définir une variable moispaye
moispaye = InputBox("Mois de la paye : ex janvier") ' Macro1 Macro ' Macro enregistrée le 07/11/2004 ' Documents.Open FileName:="""C:ASSOCPayeBulletin salaire sur conv
' Macro2maj_mois Macro ' Macro enregistrée le 07/11/2004 ' MsgBox (moispaye) ' affiche le mois qui a été défini pour vérification
ActiveDocument.MailMerge.DataSource.QueryString = _ "SELECT * FROM C:ASSOCPayesimulation 2004.xls WHERE ((mois =
'novembre' ))" _ & "" End Sub
L'instruction SELECT ... FROM ...WHERE ci-dessus ressort directement de
l'enregistrement macro de l'aide au publipostage Option de Requete dans
laquelle j'ai écrit novembre
Mon problème est de faire en sorte que après WHERE (( mois = la valeur de
ma variable moispaye définie au tout début.
Pouvez-vous m'aider à formuler correctement cetee condition WHERE
Merci d'avance
.
Bonsoir à toi aussi.
Au lieu de 'novembre' tu mets MoisPaye.
-----Message d'origine-----
Afin d'automatiser l'édition des bulletins de salaires de
l'association j'ai
créé les instructions suivantes à partir d'un formulaire
sous Word 2000 :
Private Sub CommandButton1_Click()
Dim moispaye As String
'définir une variable moispaye
moispaye = InputBox("Mois de la paye : ex janvier")
' Macro1 Macro
' Macro enregistrée le 07/11/2004
'
Documents.Open FileName:="""C:ASSOCPayeBulletin
salaire sur conv
-----Message d'origine----- Afin d'automatiser l'édition des bulletins de salaires de l'association j'ai
créé les instructions suivantes à partir d'un formulaire sous Word 2000 :
Private Sub CommandButton1_Click() Dim moispaye As String 'définir une variable moispaye
moispaye = InputBox("Mois de la paye : ex janvier") ' Macro1 Macro ' Macro enregistrée le 07/11/2004 ' Documents.Open FileName:="""C:ASSOCPayeBulletin salaire sur conv