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 Guillemet court

Guillemet court

2 réponses
Avatar
Torquemada
Bonjour à tous,
Désolé de cette question mais je n'arive pas à placer mes guillemets.

Sachant que le champ CP est de type String

Private Sub CP_AfterUpdate()
Dim strFiltre As String
strFiltre = "[CP]="" & Me![CP] & """ ICI ERREUR

Me![PrixTTC] = DLookup("[PUnit]", "[Produit]", strFiltre)
End Sub

Merci de m'avoir consacré de votre temps
Signaler un problème avec ce contenu

2 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
Torquemada
strFiltre = "[CP]= '" & Me![CP] & "'"


Bonjour à tous,
Désolé de cette question mais je n'arive pas à placer mes guillemets.

Sachant que le champ CP est de type String

Private Sub CP_AfterUpdate()
Dim strFiltre As String
strFiltre = "[CP]="" & Me![CP] & """ ICI ERREUR

Me![PrixTTC] = DLookup("[PUnit]", "[Produit]", strFiltre)
End Sub

Merci de m'avoir consacré de votre temps



Avatar
Steffy
Bonjour

J'essayerai la solution suivante:
strFiltre = "[CP]=""" & Me![CP] & """"

Steffy


"Torquemada" a écrit dans le message
de news: %
Bonjour à tous,
Désolé de cette question mais je n'arive pas à placer mes guillemets.

Sachant que le champ CP est de type String

Private Sub CP_AfterUpdate()
Dim strFiltre As String
strFiltre = "[CP]="" & Me![CP] & """ ICI ERREUR

Me![PrixTTC] = DLookup("[PUnit]", "[Produit]", strFiltre)
End Sub

Merci de m'avoir consacré de votre temps