Using A Macro For Mail Merge

[Dazzawm]

I was given the code below to put all the information I have on sheet 1 onto sheet 2 with quantities I need ready for when I do mail merge for labels. Is there a further macro that I can run to open word and put them in the word document template that has the layout I require ready for printing? Thanks.

Sub labels()
Dim LR As Long, i As Long
LR = Range("A" & Rows.Count).End(xlUp).Row
For i = 2 To LR
    Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Offset(1).Resize(Range("D" & i).Value, 3) = Range("A" & i).Resize(, 3).Value
Next i
End Sub

 

[Dazzawm]

^

 

[Dazzawm]

I am guessing by the lack of replies either this is either not possible of very difficult!!

 

[Dazzawm]

Please help someone!!!!!

 

[Dazzawm]

^

 

[bulevardi]

Something like this:
http://bulevardi.be/?content=scripting&example=exvb3

(will work in Excel 2010, not sure for older versions)