We help IT Professionals succeed at work.

how to export text from my excel cells to specific format in a word document

excelismagic asked
is there a easy way to export text from my excel cells to specific format in a word document.

this should be done automatically when i update excel cells it should update the word.

is there any easy way you know ?
Watch Question

Top Expert 2012

Select and copy (Ctrl+C) the cell(s) with the text that you need in the Word document.
Select the position on the document and choose the Paste Special item from the Paste dropdown on the Home tab.
Choose the Paste Link option on the Paste Special dialogue and click OK.

You want to  set the Word Option>Advanced>General>Update Automatic Links on Open . Also you can include the links on the document in the Selection and press F9 to show any updates.
Rob HensonFinance Analyst

Maybe you are referring to Word's mail merge options.

You can use Excel as the source data for creating multiple documents from one template, eg a mailshot to multiple customers or address labels, etc.
I recently had the same issue and I was just exploring that I encountered this question from a year ago. Maybe, you already have found your solution, but what has helped me is the following code from Microsoft answers, you can teak the path and range based on actual path and range.

Sub PopulateWordDocFromExcel()
' Add a reference to the Word-library via VBE > Tools > References > Microsoft Word xx.x Object Library.
' Create a folder named C:\Temp or edit the filnames in the code.
    Dim wrdApp As Word.Application
    Dim wrdDoc As Word.Document
    Dim bWeStartedWord As Boolean
    Dim i As Integer
    On Error Resume Next
    Set wrdApp = GetObject(, "Word.Application")
    On Error GoTo 0
    If wrdApp Is Nothing Then
        Set wrdApp = CreateObject("Word.Application")
        bWeStartedWord = True
    End If
    wrdApp.Visible = True 'optional!
    Set wrdDoc = wrdApp.Documents.Add ' create a new document
    ' or open an existing document:
    'Set wrdDoc = wrdApp.Documents.Open("C:\Foldername\Filename.docx")
    ' example word operations:
    With wrdDoc
        'copy data from A1:A10 into the word doc:
        For i = 1 To 10
            .Content.InsertAfter Range("A" & i).Value
        Next i
        wrdApp.DisplayAlerts = wdAlertsNone
        .SaveAs "C:\Temp\MyNewWordDoc.docx", FileFormat:=12 'wdFormatXMLDocument
        .Close ' close the document
        wrdApp.DisplayAlerts = wdAlertsAll
    End With
    If bWeStartedWord Then wrdApp.Quit 'close the Word application
    Set wrdDoc = Nothing
    Set wrdApp = Nothing
End Sub

Open in new window


I already had found a solution, but I could add this code to my library.