Code VBA - permuter 2 cellules aléatoirement

[mb08]

Bonjour à tous,

Je viens de démarrer sur VBA et j'ai un petit soucis sur un code.

Je m'explique : Dans un liste, j'aimerais choisir deux cellules aléatoirement et les faire permuter.

Je vous remercie d'avance pour l'aide et le temps consacré,


Mb08

 

[Staple1600]

Re : Code VBA - permuter 2 cellules aléatoirement

Bonjour à tous

mb08 (bienvenue sur le forum)
Je viens de démarrer la lecture de ta question et j'ai un petit soucis avec celle-ci 😉
...
Où est le fichier exemple joint ?
(Fichier contenant : ce que j'ai : -> puis le résultat à obtenir)

PS: fichier exemple anonymisé et allégé
(pour le joindre -> Modifier le message -> gérer les pièces jointes)

 

[mb08]

Re : Code VBA - permuter 2 cellules aléatoirement

Bonjour Staple1600,

Oui tu as tout à fait raison, j'aurai dû joindre directement le fichier.

 

[Staple1600]

Re : Code VBA - permuter 2 cellules aléatoirement

Re

Merci pour le fichier
mais ne manquerait-il pas quelque chose ?
ci-dessous contenu du module1

Option Explicit


Sub Ordonnancement()
'
' Cette procŽdure permet de faire l'ordonnancement des t‰ches en atelier.
'

 

[mb08]

Re : Code VBA - permuter 2 cellules aléatoirement

Non non, il ne manque rien. J'ai juste donné un titre à la macro.

 

[Staple1600]

Re : Code VBA - permuter 2 cellules aléatoirement

Re

Si, Si
Il manque au moins le
End Sub 😉

PS: Tu peux détailler ta pensée, stp

Dans un liste, j'aimerais choisir deux cellules aléatoirement et les faire permuter.

Car je ne pense pas que cette formule en colonne C (puis appuie sur F9) soit ce que tu cherches ?

=ALEA.ENTRE.BORNES(1;3)

 

[mb08]

Re : Code VBA - permuter 2 cellules aléatoirement

Ah oui, c'est vrai il manquait le End Sub...