Also bin dann gestern auf die Lösung gekommen... Eigentlich wärs doch relativ einfach gewesen! Also immerhin heisst es ja VBA --> Visual Basic for Applications, nicht "for Excel" oder "for Word". Das ganze wurde also auch dafür gemacht zwischen den Programmen zu kommunzieren. Also ist es logischerweise(wie ich vermutet habe) möglich Variablen zwischen den Programmen auszutauschen. War ein wenig erstaunt das dass hier niemand wusste, da ich noch seeeeeeehr viel in VBA zu lernen habe.... :)
Also die Lösung ist einfach den Wert der ComboBox1 in eine Variable zu speichern, und dann aus dem Excel heraus eine Sub im Word aufzurufen und die Variable mitzugeben.
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)
'Verwertung der Variablen
End Sub
|