I am currently exporting data from my excel spreadsheet to Word
using the following code.

Private Sub CommandButton3_Click()
Dim WordApp As Object
ActiveSheet.Range("A14:J60").copy
Set WordApp = CreateObject("Word.Application")
WordApp.Documents.Add "C:\edmund.dot"
WordApp.Visible = True
WordApp.Run "copy"
End Sub

When I run this at home it works (using office 2000)

At work they only have Office 97 and where cells have been
merged, word ignores it and restricts the data to the first cell. Is
there any way around this in Office 97.

When the word application is opened is at also possible to
automatically set the margins so that the data fits on one page