[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
2 réponses
-
Salut Jeremac,
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 !
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...
