Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

erreur 1004 Erreur définie par l’objet ou l’application résolue

  • Initiateur de la discussion Initiateur de la discussion pat66
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

pat66

XLDnaute Impliqué
Bonjour à tous,
Quelqu'un peu me dire pourquoi à l'ouverture du classeur et de la feuille protégé, excel me signale cette erreur surlignée en jaune ColorIndex interior en jaune, cela empêche la réinitialisation des couleurs de ma cellule, j'ai bien essayé d'annuler cette commande avec le signe', mais excel me signale une autre erreur sur un autre colorIndex interior

Worksheets("planning 9").Unprotect ("W")
Set Cell19 = Worksheets("planning 9").Range("F24:BL51")
With Cell19.Interior

.ColorIndex = 2 ' (en jaune)
End With
With Cell19.Font

.ColorIndex = 2
End With

Worksheets("planning 9").Protect ("W")

Je vous remercie
 
Dernière édition:
Bonjour Patrick
le Forum ,le Fil
Chez moi , ceux ci fonctionne.
En déclarant Cell19 en Range
VB:
Sub test()
Dim Cell19 As Range
Set Cell19 = Worksheets("Feuil1").Range("A1:B5")
With Cell19
  .Interior.ColorIndex = 6 'le fond (en jaune)
  .Font.ColorIndex = 4 'le Texte (en Rouge )
End With
End Sub
a voir donc
jean marie
 
Merci Jean Marie pour ton aide

j'ai essayé mais à l'ouverture du classeur la ligne interior.ColorIndex est toujours surlignée en jaune et donc mes cellules F24:BL51 sont toujours affichées au lieu d’être en blanc
Dim Cell19 As Range
Set Cell19 = Worksheets("planning 9").Range("F24:BL51")
With Cell19
.Interior.ColorIndex = 2 (en jaune)
.Font.ColorIndex = 2
End With

Patrick
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…