I am trying to add a double underline into a specific row (Cell "A" &
row). The row can change so I cannot code the position. Initially I
had the text coded with a double underline, but my user wants some
space between the text and the underline, which led me to try using the
shape object. How would I change the following code:


Code:
--------------------
With Sheets(shtRpt).Shapes.AddLine(0, 100, 132, 100).Line
.Style = msoLineThinThin
.Weight = 3#
End With
--------------------


Thanks.


--
ingineu
------------------------------------------------------------------------
ingineu's Profile: http://www.excelforum.com/member.php...o&userid=14860
View this thread: http://www.excelforum.com/showthread...hreadid=566295