I am trying to send array data from Excel macro to an open
Word document using DDEPoke, however, it is not puting the
data in the Word Document. Here below is a sample of the
code in Excel macro:

'---------
channelNumber = Application.DDEInitiate( _
app:="WinWord", _
topic:="C:\WUTEMP\TEMP.DOC")

X = 1
Do While X < 4
rangeToPoke = List_Part_No(X)
'List_Part_No has 50 X 1 array dim(string)

Application.DDEPoke channelNumber, "\Startofdoc", _
rangeToPoke
X = X + 1
Loop

Application.DDETerminate channelNumber
'-----------

Thank you for your help!
Vic