Я такую конструкцию использую.
WITH .Range("L130:M135")
.borders(1).linestyle=1 && левая
.borders(2).linestyle=1 && правая
.borders(3).linestyle=1 && верх
.borders(4).linestyle=1 && низ
.borders(5).linestyle=1 && диагоналка вниз
.borders(6).linestyle=1 && диагоналка вверх
.borders(7).linestyle=1 && левая внешняя
.borders(8).linestyle=1 && верх внешняя
.borders(9).linestyle=1 && низ внешняя
.borders(10).linestyle=1 && право внешняя
.borders(11).linestyle=1 && центр вертисаль
.borders(12).linestyle=1 && центр хоризонт
ENDWITH