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

PRA007 · 01-05-2016, 05:23 AM

Both the macro worked just fine. Thank you very much.

What I wanted is this. Is It right approach?

Code:

                                With Tbl.Cell(i, 3).Range
                                    .End = .End - 1
                                    .Collapse wdCollapseEnd
                                    .Text = vbCr & "Abstract: "
                                    .Font.Bold = True
                                End With
                                With Tbl.Cell(i, 3).Range
                                    .End = .End - 1
                                    .Collapse wdCollapseEnd
                                    .Text = StrTxt
                                    .Font.Bold = False
                                End With