optionen bei MSComDlg.CommonDialog

[thorbrandt]

Hallo!

ich möchte mittels MSComDlg.CommonDialog dateien auswählen.
mit dem von mir verwendeten code funktioniert das auch solange es sich nur um eine Datei handelt.
gibt es die möglichkeit durch parameter das auswählen mehrerer dateien des selben ordners, zB. durch gedrückt halten der Ctrl-Taste, zu ermöglichen?

hier mein, für eine datei, funktionierender code:

Function DateiAusOCX() As String
  Dim CDLG As Object
  Dim strFile As String
  Set CDLG = CreateObject("MSComDlg.CommonDialog")
  With CDLG
    .DialogTitle = "Dateien wählen"
    .Filter = _
      "Import BDM Sheet|*.xls"
    .ShowOpen
    strFile = .FileName
  End With
  Set CDLG = Nothing
  DateiAusOCX = strFile
End Function

der pfad wird in strFile gespeichert. hier sollten später, durch trennzeichen getrennt, mehrere dateipfade stehen.

Vielen Dank schonmal im voraus für Eure Hilfe,

Thorbrandt

[thorbrandt]

Hallo,

ich habs gefunden. Man kanns über die Flags einstellen.

Danke!