youngtrand
07-12-2012, 11:42 AM
Hey, i'm having trouble with this code, i'm sure it is just a simple fix
With Worksheets("Sheet1") _
.Range("B1") _
.Value = "New Title" _
.Characters(5, 5).Font.Bold = True
End With
Basically everything is fine, just I want to have this apply to cells that already have text in them, not have it put in the phrase "new title" and then bold the second word. Is this possible, example: In cell A2 I have the writing "excel is fun!" and i would like to be able to run the macro and have it change the "is fun" part bold. Ideally I would like to have this work for a range of cells as well, i.e. A1:B45.
With Worksheets("Sheet1") _
.Range("B1") _
.Value = "New Title" _
.Characters(5, 5).Font.Bold = True
End With
Basically everything is fine, just I want to have this apply to cells that already have text in them, not have it put in the phrase "new title" and then bold the second word. Is this possible, example: In cell A2 I have the writing "excel is fun!" and i would like to be able to run the macro and have it change the "is fun" part bold. Ideally I would like to have this work for a range of cells as well, i.e. A1:B45.