[VBA EXCEL] aide coloration cellules
jeremac
-
Ivan-hoe Messages postés 433 Date d'inscription Statut Membre Dernière intervention -
Ivan-hoe Messages postés 433 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je voudrais colorer plusieurs cellules en même à partir d'une macro
mon code :
Range(Cells & [LineNumber, 15] & ":" & Cells & [LineNumber, 26]).Select
For Each Cell In Selection
Cells.Interior.color = QBColor(8)
Next
Et j'ai toujours la même erreur "Type mismatch"
Merci de votre aide
Je voudrais colorer plusieurs cellules en même à partir d'une macro
mon code :
Range(Cells & [LineNumber, 15] & ":" & Cells & [LineNumber, 26]).Select
For Each Cell In Selection
Cells.Interior.color = QBColor(8)
Next
Et j'ai toujours la même erreur "Type mismatch"
Merci de votre aide
A voir également:
- [VBA EXCEL] aide coloration cellules
- Liste déroulante excel - Guide
- Excel additionner plusieurs cellules - Guide
- Verrouiller cellules excel - Guide
- Excel compter cellule couleur sans vba - Guide
- Word et excel gratuit - Guide
2 réponses
Salut Jeremac,
est-ce vraiment utile de passer par une boucle For each ... next ?
est-ce vraiment utile de passer par une boucle For each ... next ?
Range(cells(LineNumber, 15), cells(LineNumber, 26)).Select Selection.Interior.Color = QBColor(8)
Du coup, tu peux ici utiliser le For each ... next auquel tu tenais tant !
Ca répète la mise en forme sur TOUTES les feuilles de calcul du classeur actif.
A suivre...
For Each Worksheet In Worksheets Worksheet.Select Range(cells(LineNumber, 15), cells(LineNumber, 26)).Interior.Color = QBColor(8) Next Worksheet
Ca répète la mise en forme sur TOUTES les feuilles de calcul du classeur actif.
A suivre...
merci bcp ça marche nikel !!
Worksheet.Range(Cells(LineNumber, 24), Cells(LineNumber, 35)).Select
Selection.Interior.Color = QBColor(2)
ça me dit "Object required"
merci de ton aide