A voir également:
- Excel roulette
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Si ou excel - Guide
- Trier un tableau excel - Guide
- Déplacer colonne excel - Guide
2 réponses
Bonjour Merci
Pour les infos voici un exemple aux cas où je ne me suis pas bien exprimé.
Je t’envoie une image suite à l’autre.
Une bonne journée à vous.
merci bien

Pour les infos voici un exemple aux cas où je ne me suis pas bien exprimé.
Je t’envoie une image suite à l’autre.
Une bonne journée à vous.
merci bien


Function Roulette(NumCases As Integer) As Integer Dim ArrValeurs, i As Byte ArrValeurs = Array(32, 15, 19, 4, 21, 2, 25, 17, 34, 6, 27, 13, 36, 11, 30, 8, 23, 10, 5, 24, 16, 33, 1, 20, 14, 31, 9, 22, 18, 29, 7, 28, 12, 35, 3, 26, 0) If NumCases > 37 Then If NumCases Mod 37 = 0 Then i = 36 Else: i = (NumCases Mod 37) - 1 End If Else: i = NumCases - 1 End If Roulette = ArrValeurs(i) End Function