Substitut à GoTo
Résolu
jacsimo
Messages postés
3
Statut
Membre
-
jacsimo Messages postés 3 Statut Membre -
jacsimo Messages postés 3 Statut Membre -
Bonjour,
Je comprends bien les préventions contre GoTo, mais je dois être un peu obtus, car je vois mal comment je peux me passer de GoTo pour écrire le programme dont l'organigramme simplifié est joint.
Si vous avez des solutions, je suis preneur, merci d'avance.
Je comprends bien les préventions contre GoTo, mais je dois être un peu obtus, car je vois mal comment je peux me passer de GoTo pour écrire le programme dont l'organigramme simplifié est joint.
Si vous avez des solutions, je suis preneur, merci d'avance.
2 réponses
Bonjour,
sans la feuille pour se rendre compte ni les explications avec le contexte ça ne sera pas forcément exact, il y aura sans doute des détails à régler.
Un exemple de structure:
eric
sans la feuille pour se rendre compte ni les explications avec le contexte ça ne sera pas forcément exact, il y aura sans doute des détails à régler.
Un exemple de structure:
Sub sansGoto()
' récup données / calcul s
'...
If s = True Then Exit Sub
' remplir matrice
'...
Do
' nouvelle ligne
'...
If testCroix = True Then
If avecSans = True Then
' imp normale
fini = "???" ' évaluer fini
Else
If plageOk = True Then
' imp plage
'...
End If
End If
End If
Loop Until fini
' imp bordure
'...
End Sub
eric