probleme avec apostrophe

Bonjour

J'ai une table dans laquelle j'ai le nom d'une commune, le fait de la valider va chercher le code postal dans une autre table.
cela marche tres bien si le nom de la commune ne contient pas d'apostrophe !!! mais bug si il y en a !!
voici le code
____________________________________________________________________________
Wcommune = Me!commune

Wcode_postal = DLookup("[code_postal]", "code_postal", "[commune] ='" & Wcommune & "'")
____________________________________________________________________________

comment le modifier pour éviter ce petit désagrémént svp

merci de votre aide

[...]
ZOOM Wcommune," ' "," ' ' ")


Merci Pierre pour cette nouvelle instruction. Encore une fonction non

[...]
ZOOM Wcommune," ' "," ' ' ")


Merci Pierre pour cette nouvelle instruction. Encore une fonction non référencée et non documentée :-(

Dire que je la cherche depuis Access2 ...
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

elle n'existe que depuis 2000 ou xp méme

--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info

"Eric" <f_framZZ@hotmail.com> a écrit dans le message de news:
u0jJiQXMHHA.992@TK2MSFTNGP06.phx.gbl...

[...]
ZOOM Wcommune," ' "," ' ' ")


Merci Pierre pour cette nouvelle instruction. Encore une fonction non

référencée et non documentée :-(
Dire que je la cherche depuis Access2 ...
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Juste une remarque: il y a dans ta formule quelque chose que le
débutant que je suis ne saisit pas bien: 2 parenthèses qui ouvrent et
3 qui ferment...

Wcode_postal = DLookup("[code_postal]", "code_postal", "[commune] ='" &
Replace(Wcommune,"'","''") & "'")

ZOOM Wcommune," ' "," ' ' ")

Bonjour Willi,

Juste une remarque: il y a dans ta formule quelque chose que le
débutant que je suis ne saisit pas bien: 2 parenthèses qui ouvrent et
3 qui ferment...

Je t'explique pendant que Pierre prend l'apéritif ;-)

Wcode_postal = DLookup("[code_postal]", "code_postal", "[commune] ='" &
Replace(Wcommune,"'","''") & "'")

Là s'arrête la bonne formule. Donc 2 parenthèses ouvrantes, 2 fermantes...

ZOOM Wcommune," ' "," ' ' ")

Ici, Pierre fait un "zoom" (non, ce n'est pas une instruction VB ;-)
,> pour mieux montrer à "general bol" la syntaxe du Replace, notamment les

paires de guillemets et les simples cotes ou apostrophes en les espaçant.
Donc, Willi, la ligne ZOOM blabla... tu jettes.

Pierre, si j'ai faux, je prends ta place pour l'apéritif... D'ailleurs,
j'y vais quand même ;-)