Où est l'erreur dans cet extrait de code

Résolu/Fermé

nadnad13 Messages postés 22 Date d'inscription mardi 5 août 2014 Statut Membre Dernière intervention 7 août 2014 - 5 août 2014 à 19:49
nadnad13 Messages postés 22 Date d'inscription mardi 5 août 2014 Statut Membre Dernière intervention 7 août 2014 - 6 août 2014 à 18:00

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.

A voir également:

Où est l'erreur dans cet extrait de code
Erreur 0x80070643 - Guide
Code asci - Guide
Code erreur t32 ✓ - Forum Livebox
Code puk bloqué - Guide
Code de déverrouillage oublié - Guide

3 réponses

Réponse 1 / 3

KX Messages postés 16733 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 31 janvier 2024 3 015
5 août 2014 à 20:42

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)"

Réponse 2 / 3

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 743
6 août 2014 à 08:49

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 :

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

Réponse 3 / 3

nadnad13 Messages postés 22 Date d'inscription mardi 5 août 2014 Statut Membre Dernière intervention 7 août 2014
6 août 2014 à 18:00

Merci beaucoup :)

Discussions similaires

Instagram "Désolé, une erreur s'est produite"

Problème de décodeur TV Bouygues Telecom

Orange - Erreur P01 Netflix

Decodeur Orange erreur S05-05

Erreur vidéo inconnue sur le Freebox Player

Discussions similaires

Newsletters