Fonction aleatoire
Bonjour je souhaite afficher de façon aleatoire du texte sur plusieurs boucle jai essayé la fonction Int(Rnd()*10)+ 1 mais ca fait bugué totalement l’excel, aurez vous une solution ?
Bonjour,
D'après le peu d'éléments transmis, il n'y a pas d'erreur dans ta syntaxe...
Merci je peux vous envoyé mon fichier en mp ?
Je préfère que tu posts une version anonymisée ou avec des données bidons ici...
For Colonne = 3 To 6
For Ligne = 2 To 4
If Worksheets("Note").Cells(2, Colonne).Value = "X" Then
Worksheets("Note").Cells(10, 2).Value = Worksheets("Commentaire").Cells(Ligne, Colonne).Value
End If
Next
Ligne = Int(Rnd(Ligne) * 72) + 1 (car 72 commentaires)
Randomize
C'est déjà un peu différent de l'exemple initial... La variable Ligne est intégrée à une boucle, quel intérêt de la réutiliser hors de la boucle pour lui affecter une valeur aléatoire ? Quel est l'objectif d'utiliser cette variable au sein de la fonction Rnd() ?
D'après ce que je comprends, je verrais plutôt le code comme ceci :
Sub Test()
Dim Colonne As Integer, Ligne As Integer
With Sheets("Note")
For Colonne = 3 To 6
Randomize
Ligne = Int(Rnd() * 72) + 1
If .Cells(2, Colonne) = "X" Then .Cells(10, 2) = Sheets("Commentaire").Cells(Ligne, Colonne)
Next Colonne
End With
End If