Bonjour
Je reviens vers vous, car j'obtiens une erreur et je ne sais pas pourquoi :
Je me suis inspiré de l'enregistreur de macro pour supprimer toutes les bordures d'une plage de cellules mais visiblement quelque chose pose pb :
"La méthode Select de la classe Range à échouée"
--->
Je vous remercie pour votre aide,
Je reviens vers vous, car j'obtiens une erreur et je ne sais pas pourquoi :
Je me suis inspiré de l'enregistreur de macro pour supprimer toutes les bordures d'une plage de cellules mais visiblement quelque chose pose pb :
"La méthode Select de la classe Range à échouée"
--->
Code:
Sheets("STOCK_EOS").Range("A3:B500").Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
Selection.Borders(xlEdgeLeft).LineStyle = xlNone
Selection.Borders(xlEdgeTop).LineStyle = xlNone
Selection.Borders(xlEdgeBottom).LineStyle = xlNone
Selection.Borders(xlEdgeRight).LineStyle = xlNone
Selection.Borders(xlInsideVertical).LineStyle = xlNone
Selection.Borders(xlInsideHorizontal).LineStyle = xlNone
Je vous remercie pour votre aide,