besoin d'aide pour macro avec plusieurs IF succéssifs

loiclass · 30 Janvier 2013

Bonjour,

J'aurais besoin d'aide sur une partie de macro.
Mon but est de d'avoir:

Si x<9 alors on écrit 0001, 0002, ... 0009
Si 10<x<99 alors on écrit 0010,0011 ... 0099
Si 100<x<999 alors on écrit 0100... 0999
Si x<1000 alors on écrit 1000, 1001 ...

J'ai tenté de l'écrire avec le code suivant qui ne fonctionne qu'en partie.

If .Range("A2")< 9 then
num="000" & .Range("A2")
End if

If 10< .Range("A2") < 99 then
num="00" & .Range("A2")
End if

If 100 < .Range("A2") < 999 then
num="0" & .Range("A2")
End if

If .Range("A2") > 999 then
num=.Range("A2")
End if

Est ce que quelqu'un pourrait m'aider, svp?

Merci

Pierrot93 · 30 Janvier 2013

Re : besoin d'aide pour macro avec plusieurs IF succéssifs

Bonjour,

petite remarque au passage, pourquoi ne pas utiliser un format personnalisé :
0000

bonne journée
@+

loiclass · 30 Janvier 2013

Re : besoin d'aide pour macro avec plusieurs IF succéssifs

Merci Pierrot,

Je n'y avais pas pensé, je cherchai à faire compliqué.
Je teste et revient vers vous si nécessaire.

besoin d'aide pour macro avec plusieurs IF succéssifs

loiclass

XLDnaute Occasionnel

Pierrot93

XLDnaute Barbatruc

loiclass

XLDnaute Occasionnel

Discussions similaires

besoin d'aide pour macro avec plusieurs IF succéssifs

loiclass

XLDnaute Occasionnel

Pierrot93

XLDnaute Barbatruc

loiclass

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency