Microsoft Office Forums - View Single Post - How to insert text at specific location as bold

gmayor · 01-05-2016, 01:47 AM

Presumably you want to put the text in the cell and format it as bold? In which case

Code:

strtxt = "SomeText"
    'set a range to the cell
    Set rng = tbl.Cell(i, 3).Range
    'remove the end of cell character from the range
    rng.End = rng.End - 1
    'Add the text to the range
    rng.Text = strtxt
    'Format the range
    rng.Font.Bold = True