Mélange aléatoire et transfert

SergiO

XLDnaute Accro

• 30 Octobre 2007

• #2

Re : Mélange aléatoire et transfert

Bonjour Daniel,

Peut-être cette formule en F10 : =RECHERCHEV(E10;$A$10:$B$21;2;0)

à recopier vers le bas pourrait suffire.

@+

 

Vote positif 0 Vote négatif

M

mfb

XLDnaute Occasionnel

• 30 Octobre 2007

• #3

Re : Mélange aléatoire et transfert

Bonjour Sergio,
Merci pour une réponse aussi rapide ça marche MAIS n' y aurait il pas une astuce macro
qui éviterait les formules?
Daniel

 

Vote positif 0 Vote négatif

SergiO

XLDnaute Accro

• 30 Octobre 2007

• #4

Re : Mélange aléatoire et transfert

Re,

Essaie donc de rajouter la ligne en rouge dans le code :

Code:

'...Début du code
Cells(j + 9, 5) = x
[COLOR=Red]Cells(j + 9, 6) = Cells(9 + x, 2)[/COLOR]
melange.Remove i
'... suite du code

@+

 

Vote positif 0 Vote négatif

M

mfb

XLDnaute Occasionnel

• 30 Octobre 2007

• #5

Re,
IMPEC, cela parait tellement simple quand on a la solution on peut se dire que suis je bête pour ne pas y avoir pensé.
Mrerci encore
A+
Daniel

 

Vote positif 0 Vote négatif