Einen schönen Sonntag wünsche ich allerseits,<br>
ich habe ein Problem mit Word. Ich mochte per OLE und VBA in ein Worddokument Daten schreiben. Soweit kein Problem. Allerdings sollten die Daten in einem Textfeld stehen. Der VBA-Befehl dazu lautet so:<br>
<b>ActiveDocument.FormFields.Item("Text2").Resul t = "Hallo"</b><br> Nun habe ich das ganze in C++Builder ertellt und kann in Word das Dokument laden. ich habe mir folgenden Quellcode dazu erstellt:
<PRE>
Variant word;
word = CreateOleObject("word.application");
try{
word.OlePropertySet("Visible", true);
word.OlePropertyGet("Documents").Exec(Procedure("O pen") << Edit1->Text);
word.OlePropertyGet("ActiveDocument").OlePropertyG et("FormFields").OlePropertySet("Item","Inventarnu mmer","Hallo");
<I>// Procedure SetText("ActiveDocument.FormFields.Item(\"Inventar nummer\").Result" << Edit1->Text);</I>
}
__finally
{
word.Exec(Procedure("Quit"));
}
</PRE>
Dieser Code funktioniert aber nicht. Kann mir bitte jemand weiterhelfen?
Vielen Dank<br>
Klaus
ich habe ein Problem mit Word. Ich mochte per OLE und VBA in ein Worddokument Daten schreiben. Soweit kein Problem. Allerdings sollten die Daten in einem Textfeld stehen. Der VBA-Befehl dazu lautet so:<br>
<b>ActiveDocument.FormFields.Item("Text2").Resul t = "Hallo"</b><br> Nun habe ich das ganze in C++Builder ertellt und kann in Word das Dokument laden. ich habe mir folgenden Quellcode dazu erstellt:
<PRE>
Variant word;
word = CreateOleObject("word.application");
try{
word.OlePropertySet("Visible", true);
word.OlePropertyGet("Documents").Exec(Procedure("O pen") << Edit1->Text);
word.OlePropertyGet("ActiveDocument").OlePropertyG et("FormFields").OlePropertySet("Item","Inventarnu mmer","Hallo");
<I>// Procedure SetText("ActiveDocument.FormFields.Item(\"Inventar nummer\").Result" << Edit1->Text);</I>
}
__finally
{
word.Exec(Procedure("Quit"));
}
</PRE>
Dieser Code funktioniert aber nicht. Kann mir bitte jemand weiterhelfen?
Vielen Dank<br>
Klaus