underlining

[Karen]

Hello,

I would like to be able to get consistent double or
single underlining on a spreadsheet. I don't want to use
borders, which underline across the entire cell width.
Nor do I want to use the accounting underlines, because
those only underline the characters entered. I want to
be able to have a custom underline (format?) that I can
specify, say I wish a double underline that is always 10
characters.

Any ideas?

Thanks,

Karen

 

[Jason Morin]

You could use a simple macro like this:

Sub UnderlineFirst10()
With ActiveCell.Characters(Start:=1, Length:=10).Font
.Underline = xlUnderlineStyleDouble
End With
End Sub

and assign it to a custom button. This macro would double
underline the first 10 characters in the active cell.

HTH
Jason
Atlanta, GA

 

[Karen]

Thanks, Jason, but I can't make it work. It seems like
the action of the Font Underline Style takes over and
still underlines all the way across the cell.

Karen

 

[Steig]

Karen,

Did you find a solution to this? Exactly the problem I'm
attempting to solve.

Steig