even

bonjour
çà ne me dit rien cette function even,

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"xav" <xav@xav.fr> a écrit dans le message de news:eKTY9CJzEHA.3408@tk2msftngp13.phx.gbl...

bonjour
dans un userfrom je veux tester une valeur saisie dans un textbox ou dans
une cellule d'une feuille si elle est paire
j'ai essaye
if Even(textbox) =true then..... il dit function ou sub on defini
if Even(Feuil1!G1) = true then il dit pareil

merci pour votre aide

bonjour,

a est pair si
a mod 2 = 0 (voir l'aide, il arrondit les nombres non entier avant de faire
la division...)

de même
range("feuil1!A1")mod 2 = 0

quant à la syntaxe avec textbox, je ne sais pas

cordialement

Bourby

"xav" wrote:

bonjour
dans un userfrom je veux tester une valeur saisie dans un textbox ou dans
une cellule d'une feuille si elle est paire
j'ai essaye
if Even(textbox) =true then..... il dit function ou sub on defini
if Even(Feuil1!G1) = true then il dit pareil

merci pour votre aide

Bonjour

Cela ne me dit rien non plus...

Utilise MOD
If ((textbox mod 2)=0) = true then ...

Ok?


--
Pierre Fauconnier (pierre.fauconnier@nospam.nospam)
Les sept laids tuent ( Lewis Carol )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"xav" <xav@xav.fr> a écrit dans le message de
news:eKTY9CJzEHA.3408@tk2msftngp13.phx.gbl...

bonjour
dans un userfrom je veux tester une valeur saisie dans un textbox ou dans
une cellule d'une feuille si elle est paire
j'ai essaye
if Even(textbox) =true then..... il dit function ou sub on defini
if Even(Feuil1!G1) = true then il dit pareil

merci pour votre aide

Bonsour ®,
il faut cocher les macro complémentaires
Analysis Toolpak et Analysis toolpak VBA
(utilitaires d'analyses en Fr)

MsgBox "pair ? " & Evaluate("=isEVEN(A1)")

;o)))

-----Message d'origine-----
bonjour
dans un userfrom je veux tester une valeur saisie dans
un textbox ou dans

une cellule d'une feuille si elle est paire
j'ai essaye
if Even(textbox) =true then..... il dit function ou sub
on defini

if Even(Feuil1!G1) = true then il dit pareil

merci pour votre aide


.

je vais essayer tout cela je vous tiens au courrant

merci
xav

"Modeste" <gee-dee-@discussions.microsoft.com> a écrit dans le message de
news: 63c801c4cc95$36677600$a401280a@phx.gbl...
Bonsour ®,
il faut cocher les macro complémentaires
Analysis Toolpak et Analysis toolpak VBA
(utilitaires d'analyses en Fr)

MsgBox "pair ? " & Evaluate("=isEVEN(A1)")

;o)))

-----Message d'origine-----
bonjour
dans un userfrom je veux tester une valeur saisie dans
un textbox ou dans

une cellule d'une feuille si elle est paire
j'ai essaye
if Even(textbox) =true then..... il dit function ou sub
on defini

if Even(Feuil1!G1) = true then il dit pareil

merci pour votre aide


.