Eingebaute Dialoge
Alle Office-Anwendungen
FileDialog
Das 'FileDialog'-Objekt ist in allen Office-Anwendungen enthalten und wird wie folgt eingesetzt (Beispiel einer Funktion, welche die Auswahl eines Verzeichnisses ermöglicht): Private Function BrowseToPath() As String Dim dlg As FileDialog Set dlg = Application.FileDialog(msoFileDialogFolderPicker) dlg.Title = "Zielverzeichnis wählen" dlg.InitialFileName = "C:\temp\" dlg.Show If dlg.SelectedItems.Count > 0 Then BrowseToPath = dlg.SelectedItems.Item(1) End If End Function Siehe auch Arbeiten mit Dateien: Eingebaute Datei-Dialoge für weitere Möglichkeiten und Optionen.
Word und Excel
Die Anwendungen Word und Excel stellen viele ihrer eigenen Dialoge über das 'Dialogs'-Objekt zur Verfügung. In PowerPoint stehen keine eigenen Dialoge zur Verfügung. Bitte beachten: Viele der über 'Dialogs' angebotenen Dialoge wurden inzwischen von anderen Lösungen abgelöst (zum Beispiel Task Panes für Seriendruck, der Druckvorgang erfolgt nun über einen Aufgabenbereich) und erscheinen dem Anwender somit eventuell fremd und altmodisch.