Eviter certains nombres aleatoires

[mamour60]

Bonsoir a tous,

Je vaudrais eviter certains nombres (Qui se trouve dans la colonne A)
lorsque je lance la macro.

Merci de votre aide.

Bruno

 

[R@chid]

Re : Eviter certains nombres aleatoires

Bonsoir,
une intervention par formule si ça te convient...
Amicalement

 

[Modeste geedee]

Re : Eviter certains nombres aleatoires

Bonsour® R@chid

Bonsoir a tous,

Je vaudrais eviter certains nombres (Qui se trouve dans la colonne A)
lorsque je lance la macro.

autre solution (chirogourdiste) sans macro,...

 

[mamour60]

Re : Eviter certains nombres aleatoires

Bonjour Modeste geedee
Bonjour R@chid

Merci pour les exemples que je vais garder mais l'idéal pour moi
c'est de le faire par macro

Donc si vous avez une solution je suis preneur.

Bonne journée et encore merci

Bruno

 

[Si...]

Re : Eviter certains nombres aleatoires

salut

vois Si... tu peux adapter

Sub test()
  Dim n As Byte
  Do
    n = Int((50 * Rnd) + 1)
  Loop Until Application.CountIf(Range("A2:A6"), n) = 0
 [D5] = n
End Sub

 

[mamour60]

Re : Eviter certains nombres aleatoires

Bonjour Si... ,


Super c'est exactement ce que je voulais

Alors un grand merci à vous de votre aide
@+

B runo