Comment sortir de boucle for quand condition atteinte
Résolu
John
-
John -
John -
Bonjour,
Comment je fais pour sortir d'une boucle for, sans utiliser le (Goto). C'est mon examen de vba bientôt et je sais pas comment.
Voici un exercice ou je dois créer une fonction qui demontre si les valeurs du tableau en 1D sont deccroissant. Help
Public Function EstEnOrdreDecroissant(ByRef tableau() As Double) As Boolean
Dim i As Integer ' compteur de boucle
Dim donnee1 As Integer ' variable pour l'associer à la premiere valeur de la boucle
Dim stockVariable As Integer ' compteur pour stocker la dernière valeur du tableau
EstEnOrdreDecroissant = False
stockVariable = 0
For i = LBound(tableau) To UBound(tableau)
donnee1 = tableau(i)
If tableau(i) <= stockVariable Then
EstEnOrdreDecroissant = True
Else
EstEnOrdreDecroissant = False
stockVariable = tableau(i)
Next i
End Function
Comment je fais pour sortir d'une boucle for, sans utiliser le (Goto). C'est mon examen de vba bientôt et je sais pas comment.
Voici un exercice ou je dois créer une fonction qui demontre si les valeurs du tableau en 1D sont deccroissant. Help
Public Function EstEnOrdreDecroissant(ByRef tableau() As Double) As Boolean
Dim i As Integer ' compteur de boucle
Dim donnee1 As Integer ' variable pour l'associer à la premiere valeur de la boucle
Dim stockVariable As Integer ' compteur pour stocker la dernière valeur du tableau
EstEnOrdreDecroissant = False
stockVariable = 0
For i = LBound(tableau) To UBound(tableau)
donnee1 = tableau(i)
If tableau(i) <= stockVariable Then
EstEnOrdreDecroissant = True
Else
EstEnOrdreDecroissant = False
stockVariable = tableau(i)
Next i
End Function
A voir également:
- Sortir d'une boucle vba
- Comment sortir du bios ✓ - Forum Windows
- Mon pc s'allume et s'éteint en boucle - Forum Matériel & Système
- Incompatibilité de type vba ✓ - Forum Programmation
- L'indice n'appartient pas à la sélection vba - Forum VB / VBA
- Mon ordinateur s'allume et s'eteint en boucle ✓ - Forum Matériel & Système
Merci