psyke38
Messages postés17Date d'inscriptionjeudi 27 mai 2004StatutMembreDernière intervention27 juin 2004
-
1 juin 2004 à 21:04
crenaud76
Messages postés4172Date d'inscriptionmercredi 30 juillet 2003StatutMembreDernière intervention 9 juin 2006
-
1 juin 2004 à 23:56
j'ai un probleme avec mon programme
le voici
Private Sub rechercher_Click()
msgsaisie = "Saisissez le nom"
valeur = InputBox(msgsaisie, "C'est la saisie")
msgreponse = "Vous avez tapé " & valeur
reponse = MsgBox(msgreponse, Style, "Donc")
ActiveDocument.MailMerge.DataSource.QueryString = _
"SELECT * FROM C:\WINDOWS\Bureau\projet\LISTE EVAT.xls WHERE ((nom = valeur))" _
& ""
With ActiveDocument.MailMerge
.Destination = wdSendToNewDocument
.MailAsAttachment = False
.MailAddressFieldName = ""
.MailSubject = ""
.SuppressBlankLines = True
With .DataSource
.FirstRecord = wdDefaultFirstRecord
.LastRecord = wdDefaultLastRecord
End With
.Execute Pause:=True
End With
End Sub
il faudrait que dans mon where dans la requete SQL, je puisse lire la valuer que je rentre au début
en fait, c'est a aprtir d'un fichier word, que j'ai fais un publipostage, et il me faudrait juste le nom d'une personne et pas tous