Erreur de syntaxe

Yldie

XLDnaute Junior
Bonsoir à tous et bonne fête de la zik,

Je suis :mad::mad:
Mon code qui marche sur certains PC, ne marche pas sur le mien, voici ce code (mise en forme conditionnelle dépassant les 3 critères habituels) :

Sub conditionnel()
ActiveSheet.Unprotect ("password")
Application.ScreenUpdating = False
For Each Cellule In [B4:W34]
Cellule.Select
ActiveCell.Interior.ColorIndex = xlNone
With Cellule
Select Case .Value
Case Is = ""
ActiveCell.Interior.ColorIndex = 0
Case Is = "piscine 1"
ActiveCell.Interior.ColorIndex = 34
Case Is = "piscine 2"
ActiveCell.Interior.ColorIndex = 33
Case Is = "aqua"
ActiveCell.Interior.ColorIndex = 32
ActiveCell.Font.ColorIndex = 2
End Select
End With
Next Cellule
Application.ScreenUpdating = True
Range("a1").Select
ActiveSheet.Protect ("password")
End Sub

il me met à chaque fois qqchose comme erreur de compilation ou de syntaxe ou caché dans le module.......bref BUG à chaque fois et visiblement il apprécie pas Cellule et les [ : ]
HELP, AU SECOURS, A L'AIDE..........MERCI D'AVANCE !!!
 

Yldie

XLDnaute Junior
Re : Erreur de syntaxe

Vraiment désolé STAPLE, j'ai essayé tous tes codes mais en vain.....il n'y a plus d'erreur (ça c'est déjà très bien !!!) mais le résultat est qu'il ne prend que qques cellules du tableau mais pas l'ensemble de mes "Case is"

On devrait bien y arriver qd même.......:p:p
 

Cousinhub

XLDnaute Barbatruc
Inactif
Re : Erreur de syntaxe

Re-

Yldie, dans l'éditeur VBE, (dans la page Macro), tu cliques sur Outils/options, dans l'onglet "Editeur", décoche "Déclaration des variables obligatoire"

juste pour le fun, et remet-le ensuite, c'est une très bonne habitude....
 

Yldie

XLDnaute Junior
Re : Erreur de syntaxe

Voici ma pièce jointe avec erreur 400 maintenant (ça faisait longtemps....),
Je vais voir ça Bh², j'ai la tête dans le guidon et vous remercie encore tous très sincèrement
:):):)
 
Dernière édition:

Discussions similaires

Réponses
6
Affichages
542

Statistiques des forums

Discussions
314 450
Messages
2 109 729
Membres
110 553
dernier inscrit
loic55