.Interior.ColorIndex = N ' avec N compris entre 1 et 56'
ColorIndex fait appel à la palette de couleurs qui a 56 couleurs possibles.
ou
Code:
.Interior.Color = xlNone
xlNone est un mot réservé VBA veut dire "pas de couleurs" mais ne peut être appliqué qu'à .color et non à .colorIndex.
Donc je pense que votre code devrait être :
Code:
With Range("A1:P8")
.Interior.Color = xlNone
.Font.ColorIndex = 1
.Borders.Value = 0
End With
Si votre ColorIndex = 1 veut dire noir alors vous auriez la possibilité de faire :
Code:
.Font.ColorIndex = 1
ou
.Font.Color =RGB(0,0,0)
ou
.Font.Color=0
ou
.Font.Color=vbBlack
De base, en VBA vous avez 5 couleurs définies : vbWhite, vbBlack, vbGreen, vbRed et vbBlue.
Oui et pour cause, vous êtes beaucoup à avoir répondu, tous ont bien répondu sauf que le problème n'est pas situé dans cette macro, j'ai complètement oublié de déprotéger la feuille.
Maintenant çà marche mieux.. Merci