Où est l'erreur dans cet extrait de code
Résolu
nadnad13
Messages postés
22
Date d'inscription
Statut
Membre
Dernière intervention
-
nadnad13 Messages postés 22 Date d'inscription Statut Membre Dernière intervention -
nadnad13 Messages postés 22 Date d'inscription Statut Membre Dernière intervention -
Bonjour tout le monde,
Voici l'extrait de code en question:
For computer = 3 To n Step 3
if sheets(feuil1).cells(i,4).value = "Ecl"
J'aimerais savoir pourquoi lorsque j'écris la ligne : if sheets(feuil1).cells(i,4).value = "Ecl" , on me sort ceci : Erreur de compilation. Attendu: Then ou GOTO
Où réside le problème ??
Je vous remercie d'avance.
Voici l'extrait de code en question:
For computer = 3 To n Step 3
if sheets(feuil1).cells(i,4).value = "Ecl"
J'aimerais savoir pourquoi lorsque j'écris la ligne : if sheets(feuil1).cells(i,4).value = "Ecl" , on me sort ceci : Erreur de compilation. Attendu: Then ou GOTO
Où réside le problème ??
Je vous remercie d'avance.
A voir également:
- Où est l'erreur dans cet extrait de code
- Code ascii - Guide
- Code de déverrouillage oublié - Guide
- Code puk bloqué - Guide
- Code activation windows 10 - Guide
- Code blocks - Télécharger - Langages
3 réponses
Bonjour,
Je ne connais pas VB mais ici l'erreur est super évidente. Tu as une condition mais tu ne fais rien avec, tu dois ajouter une action à faire si la condition est vérifié. Sinon tu peux supprimer toute ta boucle car elle ne sert à rien sans action associée.
"SI la valeur de la cellule (i,4) dans la feuilles est égale à "Ecl" ALORS je fais quelque chose (obligatoire) SINON je fais autre chose (facultatif)"
Je ne connais pas VB mais ici l'erreur est super évidente. Tu as une condition mais tu ne fais rien avec, tu dois ajouter une action à faire si la condition est vérifié. Sinon tu peux supprimer toute ta boucle car elle ne sert à rien sans action associée.
"SI la valeur de la cellule (i,4) dans la feuilles est égale à "Ecl" ALORS je fais quelque chose (obligatoire) SINON je fais autre chose (facultatif)"
Bonjour nadnad13,
Salut kx,
KX a entièrement raison. If est un test. Partant de ce principe, un test engendre forcément une réponse... Si ... Alors.
Dans ton cas :
Avec, en prime, un Tutoriel sur IF
Salut kx,
KX a entièrement raison. If est un test. Partant de ce principe, un test engendre forcément une réponse... Si ... Alors.
Dans ton cas :
For computer = 3 To n Step 3
If sheets(feuil1).cells(i,4).value = "Ecl" Then
'ICI du code si la condition est vraie
Else
'ICI le cas ou la condition est fausse (il n'y a pas écrit Ecl dans ta cellule)
End If 'Ne pas oublier!!!
Next computer
Avec, en prime, un Tutoriel sur IF
