mettre une couleur a l'interieur d'une selection de cellules Fermé

Question

Bonjour,
Etant novice en VBA, j'essaie d'apprendre, pouvez-vous me dire pourquoi le code suivant ne fonctionne pas:

Selection.Interior.Color = RGB(174, 240, 194)

Merci d'avance

Mike-31 · Answer

Bonjour,

ton code est bon
Selection.Interior.Color = RGB(174, 240, 194)

tu pourrais également écrire
Selection.Interior.ColorIndex = 35

fouvaut · Answer

Merci, mais lorsque je l'exécute il me signale une erreur :
 Erreur de compilation : 
fonction ou variable attendue

Je ne comprend pas trop ...

Mike-31 · Answer

Re,

ce n'est pas cette ligne de code qui est en erreur, en tête de code tu dois avoir Option Explicit 
désactive le pour tester en mettant une apostrophe devant  
'Option Explicit

teste le code, si le code fonctionne il faudra réactiver l'Option Explicit et voir la ligne en erreur
A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.

fouvaut · Answer

Donc ce code seul, ne peut pas fonctionner :
Sub couleurs()

selection.Interior.Color = RGB(174, 240, 194)

End Sub

Je l'ai trouvé dans un cours et comme je n'arrive pas à le faire fonctionner j'essaie de comprendre.
désolé...

Mike-31 · Answer

Re, 

Ce code placé dans un module fonctionne parfaitement, mais peut être as tu la feuille protégée, mais le code par lui même est parfaitement correct

Sub couleurs()
selection.Interior.Color = RGB(174, 240, 194)
End Sub

fouvaut · Answer

c'étais ça, j'ai changé de classeur et ça marche.
Je te remercie

A+
Fouvaut

Maurice · Answer

Bonjour

il faut sélectionner le Range

Sub testCouleur()
Range("B2").Interior.ColorIndex = 35
End Sub

A+
Maurice

Mettre une couleur a l'interieur d'une selection de cellules

7 réponses

Discussions similaires