macro vba

[jonathan]

bonjour.je suis en deug d'éco-gestion et je voudrais savoir comment créer 1 macro en vba calculant les chiffres paires d'un nombre a.je vous en remercie d'avance!

 

[Wilfried]

Salut jonathan

Voici la seul methode que j'ai trouver :

dim m_nb as variant
dim m_resu as integer

m_nb=""
do until m_nb="fin"
m_nb=inputbox("ENTRER UN NOMBRE OU FIN POUR QUITTER")
if m_nb<>"fin" then
m_resu = m_nb mod 2
select case m_resu
case 0
msgbox("Le nombre : " & m_nb & " est un nombre PAIR")
case 1
msgbox("Le nombre : " & m_nb & " est un nombre IMPAIR")
end select
end if
loop


et voili voila

A++ et bon courage pour tes études... et Le monde merveilleux de VBA

Wilfried