Discussion :

[Elremmiz]

Bonjour !


Alors j'ai une boucle if avec l'erreur 91 mais bon vb et moi ça fait 2

Je veux que en fonction de ce qu'il y a dans une cellule, certaines tâches soient exécutées.

Mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Public Sub affiche_points()
 Dim cellule As Range
    Range("P23").Select
    'Range(Selection, Selection.End(xlDown)).Select
 
           If cellule.Value = "3" Then
' instructions.........
' etc

En exécution pas à pas il me marque que l'erreur est dans le if, mais je ne vois pas pourquoi
Si vous pouviez m'aider ce serait sympa

Ensuite j'aurai une 2è petite question subsidiaire. J'aimerais mettre des labels déjà existant dans un tableua de label, mais après plusieurs essais, là aussi ça ne marche pas -_- ....

Merci d'avance pour vos réponses

[skorpio]

n'oublie pas de rajouter à la fin de ton code End If

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
if .... then
.....
End If

[Plateforme3]

Bonjour
Tu dimensionne: Dim Cellule as range, c'est bien
Mais tu oublies de lui affecter ensuite une valeur: set cellule as range("P23") par exemple
Slts

[sash6]

Bonjour,

Essaie de voir avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

cellule=3

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

cellule.value=3

Il y a une histore de distinction entre les chaînes de texte et les valeurs numériques...

PS: et mets ton code entre les balises s.t.p. ça facilite la lecture

[Elremmiz]

Wouaou rapide tout ça ^^

Oui désolé pour les balises, et ne vous inquiétez pas les end if etc je les ai mises ^^ mais je viens de résoudre le problème

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If Range("P23").Value = "3" Then

Juste remplacer par ça, plus de variable cellule et c'est bon ^^

[skorpio]

ouai mais justement il se sert de la variables "cellule"

[Elremmiz]

Bon bah ça marche pas xD

Comme d'habitude le compilateur ne trouve rien... mais depuis que j'ai changé ça, les instructions contenues dans le if ne sont plus exécutées comme s'il n'y avait rien

[Elremmiz]

C'est bon problème résolu !
Merci beaucoup

[AlainTech]

En plus d'utiliser les balises [code] quand tu postes du code, il faudrait penser à cliquer sur le bouton Résolu quand tu as la solution à ton problème.

[zazaraignée]

Déjà que le titre n'est pas clair: If, c'est pas une boucle!

Et que son problème ne vient pas du If...

Pourquoi on ne 'flushe' pas tout simplement!