Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Word öffnen und datei speichern!
Autor: JPGForce
Datum: 06.03.04 21:29
Imports Word ' 'http://msdn.microsoft.com/library/default.asp?url=/library/en-us/office97/html/output/F1/D4/S5A916.asp 'http://support.microsoft.com/default.aspx?scid=kb;de;306682 'http://www.galileocomputing.de/openbook/vb_net/msvb080004.htm#Rxxmsvb080004464WordFormularesteuern ' Dim ReportLocation As String = "C:\Dokumente und Einstellungen\Admin\Eigene Dateien\Dr.doc" ' Dim m_wdApp As New Word.ApplicationClass m_wdApp = CreateObject("Word.Application") ' Dim m_wdDatei As Word.Document ' m_wdDatei = m_wdApp.Documents.Open(ReportLocation) ' m_wdDatei.Select() ' Dim Name As String ' Name = "Besitzer_Anrede" If m_wdDatei.Bookmarks.Exists(Name) = True Then m_wdDatei.FormFields().Item(Name).Result = "TesTexT (Herr / Zauberer ...)" End If ' Name = "Besitzer_Name" If m_wdDatei.Bookmarks.Exists(Name) = True Then m_wdDatei.FormFields().Item(Name).Result = "TesTexT (Potter Harry)" End If ' Name = "Besitzer_AdresseStra" If m_wdDatei.Bookmarks.Exists(Name) = True Then m_wdDatei.FormFields().Item(Name).Result = "TesTexT (Gryffindor 111)" End If ' Name = "Besitzer_AdresseOrt" If m_wdDatei.Bookmarks.Exists(Name) = True Then m_wdDatei.FormFields().Item(Name).Result = "TesTexT (11111 Hogwards)" End If ' m_wdApp.Visible = False 'm_wdDatei.SaveAs(NewReportLocation ) ' m_wdDatei.PrintOut(False) m_wdApp.Documents.Close(Word.WdSaveOptions.wdDoNotSaveChanges) ' m_wdApp.Quit() '

Word öffnen und datei speichern!	2.098	Chrissybshugar	30.04.03 13:36
Word öffnen und datei speichern!	1.699	Chrissybshugar	30.04.03 13:38
Re: bin schon ein stück weiter	1.550	Chrissybshugar	30.04.03 13:52
Re: Word öffnen und datei speichern!	1.582	JPGForce	06.03.04 21:29
Re: Word öffnen und datei speichern!	1.570	JPGForce	06.03.04 23:52

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen