Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access erreur de syntaxe sur impression

erreur de syntaxe sur impression

4 réponses
Avatar
Pascal
bonjour,
suite au lancement de ce code
Private Sub cmdImprimerBons_Click()
Dim strDocName As String
Dim strWhere As String
strDocName = "EtatBonsIndividuel"
strWhere = "[Société] =" & Me!Société
DoCmd.OpenReport strDocName, acPreview, , strWhere
End Sub

j'obtiens ce type d'erreur
erreur d'exécution 3075
erreur de syntaxe opérateur absent dans l'expression
'([société]=LeNomAffiché)'.

Euh!!!! Qu'est -ce que j'ai raté?

Merci de m'éclairer

Pascal
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jessy Sempere
Bonjour

Il y a de forte chance que Société soit de type texte, dans ce cas essais :

strWhere = "[Société] ='" & Me!Société & "'"

@+
Jessy Sempere
------------------------------------
Site @ccess : http://access.fr.free.fr/
Pour l''''efficacité de tous :
http://www.mpfa.info/
------------------------------------



bonjour,
suite au lancement de ce code
Private Sub cmdImprimerBons_Click()
Dim strDocName As String
Dim strWhere As String
strDocName = "EtatBonsIndividuel"
strWhere = "[Société] =" & Me!Société
DoCmd.OpenReport strDocName, acPreview, , strWhere
End Sub

j'obtiens ce type d'erreur
erreur d'exécution 3075
erreur de syntaxe opérateur absent dans l'expression
'([société]=LeNomAffiché)'.

Euh!!!! Qu'est -ce que j'ai raté?

Merci de m'éclairer

Pascal




Avatar
Tisane
Bonjour Pascal,

suite au lancement de ce code
Private Sub cmdImprimerBons_Click()
Dim strDocName As String
Dim strWhere As String
strDocName = "EtatBonsIndividuel"
strWhere = "[Société] =" & Me!Société
DoCmd.OpenReport strDocName, acPreview, , strWhere
End Sub
j'obtiens ce type d'erreur
erreur d'exécution 3075
erreur de syntaxe opérateur absent dans l'expression
'([société]=LeNomAffiché)'.


Société est sans doute un champ texte. Alors essaie ceci :
strWhere = "[Société] = " & Chr(34) & Me!Société & Chr(34)
ou
strWhere = "[Société] = '" & Me![Société] & "'"
Dans ce dernier exemple, attention à l'apostrophe juste après le signe = et
entre les guillemets à la fin de l'instruction.

--
Tisane

Avatar
Pascal
Monsieur SEMPERE,
je dit : chapeau et vous remercie

société est bien de type TEXTE
mille merci

Pascal

"Jessy Sempere" a écrit dans le message de news:

Bonjour

Il y a de forte chance que Société soit de type texte, dans ce cas essais
:

strWhere = "[Société] ='" & Me!Société & "'"

@+
Jessy Sempere
------------------------------------
Site @ccess : http://access.fr.free.fr/
Pour l''''efficacité de tous :
http://www.mpfa.info/
------------------------------------



bonjour,
suite au lancement de ce code
Private Sub cmdImprimerBons_Click()
Dim strDocName As String
Dim strWhere As String
strDocName = "EtatBonsIndividuel"
strWhere = "[Société] =" & Me!Société
DoCmd.OpenReport strDocName, acPreview, , strWhere
End Sub

j'obtiens ce type d'erreur
erreur d'exécution 3075
erreur de syntaxe opérateur absent dans l'expression
'([société]=LeNomAffiché)'.

Euh!!!! Qu'est -ce que j'ai raté?

Merci de m'éclairer

Pascal






Avatar
Pascal
ben dis donc il n'y a que des doués ici
et qui partagent, merci infiniment
Pascal

"Tisane" a écrit dans le message de news:

Bonjour Pascal,

suite au lancement de ce code
Private Sub cmdImprimerBons_Click()
Dim strDocName As String
Dim strWhere As String
strDocName = "EtatBonsIndividuel"
strWhere = "[Société] =" & Me!Société
DoCmd.OpenReport strDocName, acPreview, , strWhere
End Sub
j'obtiens ce type d'erreur
erreur d'exécution 3075
erreur de syntaxe opérateur absent dans l'expression
'([société]=LeNomAffiché)'.


Société est sans doute un champ texte. Alors essaie ceci :
strWhere = "[Société] = " & Chr(34) & Me!Société & Chr(34)
ou
strWhere = "[Société] = '" & Me![Société] & "'"
Dans ce dernier exemple, attention à l'apostrophe juste après le signe =
et entre les guillemets à la fin de l'instruction.

--
Tisane