Macro to transfer data from Word to another Word document with bookmark

gmayor · #2 04-16-2018, 01:20 AM

Something seems to have been lost in the explanation. However you seem to have a document with a macro (ThisDocument) and another document with a Bookmarked text and you want to copy that bookmarked text to the document with the macro? That being the case

Code:

Dim oDoc As Document
Dim oTarget As Document
Dim oBM As Range
Dim oRng As Range
    Set oTarget = ThisDocument
    Set oRng = oTarget.Range
    oRng.Collapse 0
    Set oDoc = Documents.Open("C:\Users\jovany\Desktop\NEW WOSPC 9.2.1_RMIR - Rollout.doc")
    Set oBM = oDoc.Bookmarks("bookmark").Range
    oRng.FormattedText = oBM.FormattedText
    oRng.Bookmarks.Add "bookmark2"
    oTarget.Activate
    Set oDoc = Nothing
    Set oTarget = Nothing
    Set oRng = Nothing
    Set oBM = Nothing

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
split word document based on bookmarks with each new document title of the bookmark	megatronixs	Word VBA	9	09-05-2020 02:29 PM
Transfer data from list with multiple headings from word to excel	psohms	Word	1	06-11-2015 04:39 PM
Transfer word doc bookmarks to excel using macro	Bedsy	Word VBA	4	03-15-2015 10:58 PM
Transfer Data between Excel and Word	s_samira_21	Excel	0	01-19-2015 05:21 AM
Data transfer from Word tables to Excel	shoro	Word	4	10-01-2013 05:08 AM