[vba|word] dialogproblemchen

Computer: Software & Programmierung Visual Basic
#1

hi leute,

die folgenden vba-zeilen machen genau das, was ich will. ich benutze damit den öffnen-dialog von word, damit mein user eine konfigurationsdatei per dialog auswählen kann. in der variablen DateiName finde ich dann den namen der ausgewählen datei und kann diese sequentiell öffnen und verarbeiten:

Dim DatName As String
Dim Button As Integer
With Application.Dialogs(wdDialogFileOpen)
Button = .Display
DateiName = .Name
End With
If Button = 0 Then End 'wenn abbrechen gedrückt

jetzt meine frage: ich will, dass das dialogfeld mit vordefinierten werten initialisiert wird, bevor der user es angezeigt bekommt. z.b. sollen sofort nur textdateien angezeigt werden. das dialogfeld soll auch in kopf einen anderen namen bekommen und am liebsten möchte ich nur dateien anzeigen lassen, die eine bestimmt endung haben, z.b. *.tin.
kann mit da einer weiterhelfen?

lieben gruß
und danke
tobias

#2

Hi Tobias,

also, laut Word-Hilfe hat der Öffnen-Dialog folgende Eigenschaften:

Name, ConfirmConversions, ReadOnly, LinkToSource, AddToMru, PasswordDoc, PasswordDot, Revert, WritePasswordDoc, WritePasswordDot, Connection, SQLStatement, SQLStatement1, Format, Encoding, Visible

Du kannst also etwa mit

With Application.Dialogs(wdDialogFileOpen)
.Name = „*.tin“
Button = .Display
dateiname = .Name
End With

nur die *.tin-Dateien anzeigen lassen. Der Titel des Dialogs lässt sich damit allerdings nicht ändern.

Gruß

Sculpture