Hi Can someone help me to obtain the correct syntax for the following
Want to change for below syntax
to
SamD
144
VBA Code:
Dim brdr As Long
Dim Var As Variant
dim rW as Long
rw = 17
Var = Array(xlEdgeLeft, xlEdgeRight, xlInsideVertical, xlInsideHorizontal)
For brdr = LBound(Var) To UBound(Var)
[a17:M17].Borders(Var(brdr)).Weight = xlThin
Next brdr
Code:
[a17:M17].Borders(Var(brdr)).Weight = xlThin
Code:
" [A" & rw & ":M" & rw &" ]".Borders(Var(brdr)).Weight = xlThin
SamD
144
Last edited by a moderator: