Incrementation de cellule

bonsoir

j'ai ecris cette ligne de code pour incrementer de +1 une cellule voisine de B5 située 35 colonnes plus loin

Range("b5").Offset(0, 35).Select
    [Range("b5").Offset(0, 35)] = [Range("b5").Offset(0, 35)] + 1
    Range("b5").Offset(0, 35).Font.ColorIndex = 3

j'ai une erreur d’incompatibilité de type " à la ligne

[Range("b5").Offset(0, 35)] = [Range("b5").Offset(0, 35)] + 1 

est ce que ma formulation est incorrecte ? merci

Finalement en creusant , je viens de trouver .. j'ai retiré les crochets !

Merci quand meme