Code im Excel:
Public AppWD As Word.Application
Public AppDoc As Word.Document
Set AppDoc = AppWD.Documents.Add(strPath)
Set AppWD = CreateObject("Word.Application")
AppWD.Visible = True
Set AppDoc = AppWD.Documents.Add(strPath)
AppWD.Run "Initialize", strParamE, Server1E, Server2E, DBServerE, WebserverE
Die ganzen Variablen strParamE, Server1E, Server2E, DBServerE, WebserverE,
werden an die Sub Initialize im Word übergenen.
Im Word siehts dann folgendermassen aus:
Public Sub Initialize(strParamE, Server1E, Server2E, DBServerE, WebserverE)
End Sub