Bronwyn fragte, ob es eine Möglichkeit gebe, das Dialogfeld „Öffnen“ sichtbar zu machen, damit mehrere Dateien nacheinander geöffnet werden können. Während im Dialogfeld Öffnen mehrere Dokumente gleichzeitig geöffnet werden können, möchte Bronwyn dies nicht.

Eine Lösung, an der Word nur tangential beteiligt ist, besteht darin, die Dateien in einem Ordner im Windows Explorer anzuzeigen. Öffnen Sie ein Explorer-Fenster, in dem alle Dokumentdateien angezeigt werden. Sie können dann auf Dateien doppelklicken oder einen Auswahlsatz von Dateien erstellen und mit der rechten Maustaste darauf klicken und Öffnen wählen.

Das Fenster ist ständig verfügbar, und Sie müssen sich nicht darum kümmern, das Dialogfeld Öffnen wiederholt anzuzeigen.

Wenn Sie eine Lösung direkt in Word bevorzugen, denken Sie daran, dass Word sehr konfigurierbar ist, was bedeutet, dass Sie nahezu jeden Aspekt des Programms ändern können. Dies schließt das Verhalten des Dialogfelds Öffnen ein. Sie müssen lediglich einen Ersatz für den FileOpen-Befehl erstellen, wie im Folgenden beschrieben:

Public Sub FileOpen()

Dim err_handler     On Error GoTo err_handler

With Dialogs(wdDialogFileOpen)

.Name = "."

Do While .Show <> 0             .Name = "."

Loop     End With     Exit Sub

err_handler:

If Err.Number = 5174 Then         MsgBox "You can open only one file at a time.", vbCritical         Resume Next     Else         MsgBox Err.Number & vbCrLf & Err.Description, vbExclamation     End If End Sub

Wenn Sie dieses Makro aktiviert haben, zeigt Word bei jeder Auswahl von Öffnen im Menü Datei das Dialogfeld Öffnen mit allen Dateien als angegebenem Dateityp an. Sie können dann eine Datei auswählen und das Dialogfeld wird erneut geöffnet, um auf Ihre nächste Auswahl zu warten. Wenn Sie im Dialogfeld auf Abbrechen klicken, wird der Befehl beendet und Sie können Ihre anderen Aufgaben in Word beginnen.

Es gibt einen Unterschied zwischen dieser Implementierung des Dialogfelds „Öffnen“ und der Implementierung, die normalerweise von Word dargestellt wird. In Word können Sie im Dialogfeld Öffnen einen „Auswahlsatz“ erstellen, sodass Sie mehrere Dateien gleichzeitig öffnen können. Wenn Sie das Dialogfeld wdDialogFileOpen verwenden (wie beim Erstellen eines eigenen Ersatzes für den Befehl Öffnen), können Sie jeweils nur eine Datei auswählen. Dies schien für Bronwyn kein großes Problem zu sein, könnte aber für andere Benutzer ein Problem sein.

Wenn Sie die Möglichkeit behalten müssen, mehrere Dateien gleichzeitig zu öffnen, können Sie eine Befehlsleistensteuerung ausführen. Beim Ausführen der Befehlsleistensteuerung können Sie jedoch nicht testen, ob jemand auf Abbrechen klickt. Daher benötigen Sie einen anderen Weg, um aus der Schleife herauszukommen. In der folgenden Routine können Sie mehrere Dateien auswählen / öffnen. Sie müssen jedoch auch auf ein Dialogfeld antworten, um die Schleife zu verlassen, in der das Dialogfeld angezeigt wird.

Sub GetNewFiles()

Dim Response     Do While Response <> vbNo         CommandBars("Standard").Controls("&Open...").Execute         Response = MsgBox(Prompt:="Open another file?", Buttons:=vbYesNo)

Loop End Sub

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (1869) gilt für Microsoft Word 97, 2000, 2002 und 2003. Sie finden eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Word (Word 2007) und später) hier:

Ändern des Verhaltens des geöffneten Dialogfelds.