Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.newusers
|
|||
|
|||
formula to BOLD partial number
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 |
#2
Posted to microsoft.public.excel.newusers
|
|||
|
|||
formula to BOLD partial number
One simple way
Sub boldleft2() For Each c In Selection c.Characters(1, 2).Font.Bold = True Next End Sub -- Don Guillett Microsoft MVP Excel SalesAid Software "israel" wrote in message ... 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 |
#3
Posted to microsoft.public.excel.newusers
|
|||
|
|||
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 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
if font is bold then cell value is number | Excel Discussion (Misc queries) | |||
Search for a partial number | Excel Worksheet Functions | |||
Bold the number only in a concatenated with text formula... | Excel Worksheet Functions | |||
Sumif - for bold number only | Excel Discussion (Misc queries) | |||
auto bold partial text in a string | Excel Discussion (Misc queries) |