Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Datei öffnen
Autor: Prian0815
Datum: 25.10.06 09:39
Hier mal ein Beispiel wie ich eine Word-Datei öffne. Die verwendete Funktion 'AP_DateiOeffnen ist der von Windoes her bekannte Datei-öffnen - Dialog. Die Funktion findest du hier im Forum bestimmt über die Suchfunktion, wenn nicht, melden, dann kann ich sie dir auch posten. Dim Rueckwert As String ' WordLiefNicht = False Application.Screen.MousePointer = 11 'Hourglass Rueckwert = AP_DateiOeffnen("", "") 'Doc - Datei öffnen Set wdapp = GetObject(, Word.Application) Err.Clear ' Err-Objekt im Fehlerfall löschen. ' Word starten Set wdapp = CreateObject("Word.Application") If wdapp Is Nothing Then ' Fehler: Word nicht vorhanden! MsgBox msgNoWord, vbExclamation Exit Sub End If wdapp.Documents.Open filename:=Rueckwert Documents(1).Activate Gruß Armin P.S.: always look on the bright side of Life!

Datei öffnen	743	Sharpy2006	25.10.06 09:27
Re: Datei öffnen	656	Prian0815	25.10.06 09:39
Re: Datei öffnen	549	vbtricks	25.10.06 10:16
Re: Datei öffnen	508	fhuby	07.11.06 11:52
Re: Datei öffnen	508	Prian0815	07.11.06 13:32
Re: Datei öffnen	492	fhuby	07.11.06 15:51
Re: Datei öffnen	495	vbtricks	07.11.06 18:48

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