Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
308to312
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
308to312
308to312
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Worddokumente über ÖffnenDialog öffnen

Worddokumente über ÖffnenDialog öffnen
11.09.2003 15:08:19
Thomas
Hallo,

Wie alle hier, habe ich ein Problem. Ich habe in einem Programm den Öffnen-Dialog aufgerufen. Er öffnet sich auch, ich kann mir die Datei auswählen, aber leider nur Exeldateien. Meine 1. Frage: Wie kann ein Worddokument geöffnet werden?
Meine 2. Frage: Kann man den Ordner schon voreinstellen (in dem die Unterordner sich befinden), so dass der Benutzer sich nicht durch das ganze Archiv wählen muß. Sonst ist es ja keine wirkliche Arbeitserleichterung mehr.

Mein verwendetes "Programm" lautet:

Dim b As Boolean
b = Application.Dialogs(xlDialogFindFile).Show
If b = false then Msgbox

Danke und Gruß

Thomas


2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Worddokumente über ÖffnenDialog öffnen
11.09.2003 15:33:17
ChrisL
Hi Thomas

Option Explicit


Sub Word_offnen()
Dim fFile As Variant
fFile = Application.GetOpenFilename("Word-Dateien (*.doc), *.doc")
If fFile = False Then Exit Sub
CreateObject("word.application").Documents.Open(fFile).Application.Visible = True
End Sub


Gruss
Chris
AW: Worddokumente über ÖffnenDialog öffnen
11.09.2003 15:36:04
ChrisL
ChDir(Pfad)

Ändert den Pfad... stupid me... wieder die hälfte vergessen :-)
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige