Excel 2007 – Complete Border Round Cell

Scenario

Hi All

Is there a piece of code that will put a border all round a cell, other than using four bits of code, one for each edge?

Solution

Try this:

Sub xxx() 

With ActiveCell
.BorderAround ColorIndex:=3, Weight:=xlThick
End With
End Sub

SOURCE

LINK

LANGUAGE
ENGLISH