ExcelBanter - formula to BOLD partial number

On Tue, 11 Aug 2009 08:21:01 -0700, israel
wrote:

Helo,

MY experience with your group is awesome. Can you help me with this one,

I have time data "06:09:23" is there a formula where I can indicate the
first two caracters ("06") to be bold. Manually to do this could be quite a
hassle for a couple of hundred cells.

Thank you

smile

If those values are Excel time values, then you would have to first convert
them to text strings. If you do that, any formula which has these values as a
precedent would have to be changed, to take that into account.

To do this, you'd need a VBA Sub procedure.

To enter this Macro (Sub), <alt-F11 opens the Visual Basic Editor.
Ensure your project is highlighted in the Project Explorer window.
Then, from the top menu, select Insert/Module and
paste the code below into the window that opens.

To use this Macro (Sub), first select the cells you wish to change. Then
<alt-F8 opens the macro dialog box. Select the macro by name, and <RUN.

======================
Option Explicit
Sub boldleft2()
Dim c As Range
For Each c In Selection
With c
.NumberFormat = "@"
.Value = Format(.Value, "hh:mm:ss")
.Font.Bold = False
.Characters(1, 2).Font.Bold = True
End With
Next c
End Sub
=========================
--ron