importing formatted text from one document to another

cjcant · July 14th, 2011, 06:07 AM

Hi,

I am trying to import formatted text from an existing word document using the code below:

Code:

        Dim appSupply As Word.Application
        Dim docSupply As Word.Document
        Set appSupply = Word.Application
        Set docSupply = appSupply.Documents.Open("H:\proposalDocumentDevelopment\proposalTemplates\scopeOfSupply.docx")
    
        rngSupplyBody = vbNewLine & docSupply.Bookmarks("test").Range.FormattedText & vbNewLine
        docSupply.Close wdDoNotSaveChanges
        
        ''Re-insert the bookmark
        ActiveDocument.Bookmarks.Add "bmSupplyBody", rngSupplyBody

Unfortunately, it brings over the text but it is not formatted.

Can anybody help?

Thanks