Hallo zusammen,
ich habe momentan folgendes Problem:
Ich habe eine Worddatei, die mehrere Platzhalter enthält. Diese möchte ich durch einen anderen Wert aus meinem Programm ersetzen. Der Code
funktioniert bei mir zwar, bei allen anderen Testcomputern (gleiche Office Version, kein VB installiert) bekomme ich aber die Warnung, dass auf einen geschützten Speicher zugegriffen wurde und mein Programm stürzt ab. Da die anderen Rechner Bürorechner sind, wird es wohl kaum möglich sein, dort VB 2010 zu installieren.
Gibt es einen anderen Weg, einen String in einem Word-Dokument durch einen anderen zu ersetzen?
Ich benutze nur .doc-Dateien, keine .docx-Dateien, in Notepad++ kann man den Text, in dem bestimmte Platzhalter ersetzt werden sollen, auch sehen/lesen (siehe Screenshot). Der Rest ist allerdings nicht lesbar.
Mit Replace(find, replace) funktioniert es leider nicht.
Viele Grüße
Leo Bernard
ich habe momentan folgendes Problem:
Ich habe eine Worddatei, die mehrere Platzhalter enthält. Diese möchte ich durch einen anderen Wert aus meinem Programm ersetzen. Der Code
VB.NET-Quellcode
- Dim objWordApp As New Word.Application
- Dim objDoc As Word.Document
- objWordApp.Visible = True
- objDoc = objWordApp.Documents.Open(File)
- objDoc = objWordApp.ActiveDocument
- objDoc.Content.Find.Execute(FindText:="", ReplaceWith:=strVorname, Replace:=Word.WdReplace.wdReplaceAll)
- objDoc.SaveAs(SavePath)
- objDoc.Close()
- objDoc = Nothing
- objWordApp.Quit()
- objWordApp = Nothing
funktioniert bei mir zwar, bei allen anderen Testcomputern (gleiche Office Version, kein VB installiert) bekomme ich aber die Warnung, dass auf einen geschützten Speicher zugegriffen wurde und mein Programm stürzt ab. Da die anderen Rechner Bürorechner sind, wird es wohl kaum möglich sein, dort VB 2010 zu installieren.
Gibt es einen anderen Weg, einen String in einem Word-Dokument durch einen anderen zu ersetzen?
Ich benutze nur .doc-Dateien, keine .docx-Dateien, in Notepad++ kann man den Text, in dem bestimmte Platzhalter ersetzt werden sollen, auch sehen/lesen (siehe Screenshot). Der Rest ist allerdings nicht lesbar.
Mit Replace(find, replace) funktioniert es leider nicht.
Viele Grüße
Leo Bernard