Moin!
ich glaube langsam ich brauche eine Abo-Karte für das vb-paradise....
Heute möchte ich gern einwenig Text in ein Word-Dokument schreiben - aber wied einmal klemmt es mit dem Starten ...
Was habe ich bisher gemacht??
Verweis auf COM-Object Microsoft Word 14.0 Object Library
Dann habe ich mir eine Testfunktion geschrieben:
[/i]Wenn ich das Programm ausführe, dann bekomme ich folgende Fehlermeldung:
Die Zeile 461 ist die Zeile mit dem Font.Name.
Die Word-App wird noch geöffnet.
Was mich wundert in der IDE wird Selection nicht angemerkt!
Kann mir einer von Euch, mal wieder, weiterhelfen?
Gruß Jan
ich glaube langsam ich brauche eine Abo-Karte für das vb-paradise....
Heute möchte ich gern einwenig Text in ein Word-Dokument schreiben - aber wied einmal klemmt es mit dem Starten ...
Was habe ich bisher gemacht??
Verweis auf COM-Object Microsoft Word 14.0 Object Library
Dann habe ich mir eine Testfunktion geschrieben:
VB.NET-Quellcode
- [i]
- [/i]Private Sub TestWord()
- Dim Word As New Microsoft.Office.Interop.Word.Application
- Dim doc As Microsoft.Office.Interop.Word.Document
- Word.Visible = True 'Word sehen zum Test?
- 'doc = Word.Application.Documents.Add(System.AppDomain.CurrentDomain.BaseDirectory & "\Vorlage.dotx")
- doc = Word.Application.Documents.Add()
- doc.Activate()
- Dim i As Integer = 0
- ' Name der Schriftart auslesen
- doc.Selection.Font.Name = "Arial"
- doc.Selection().Range.Select()
- doc.Selection.TypeText("Dies ist der erste Absatz, bzw. die erste Zeile")
- doc.Selection.TypeParagraph()
- i += 1[i]
- ....
- end sub
[/i]Wenn ich das Programm ausführe, dann bekomme ich folgende Fehlermeldung:
System:
System.MissingMemberException: Der öffentliche Member Selection für den Typ DocumentClass wurde nicht gefunden.
bei Microsoft.VisualBasic.CompilerServices.LateBinding.LateGet(Object o, Type objType, String name, Object[] args, String[] paramnames, Boolean[] CopyBack)
bei EBL.Vermessung.NivZug.TestWord() in X:\VB_NET_2015\Projects\tappenbeckja\EBL.Vermessung\EBL.Vermessung\cls_Vermessung_NivZug.vb:Zeile 461.
Die Zeile 461 ist die Zeile mit dem Font.Name.
Die Word-App wird noch geöffnet.
Was mich wundert in der IDE wird Selection nicht angemerkt!
Kann mir einer von Euch, mal wieder, weiterhelfen?
Gruß Jan
