title image


Smiley Re: 2 Fragen zu VBA
So:



Dim fd As FileDialog

Set fd = Application.FileDialog(msoFileDialogFilePicker)

fd.Filters.Add "Excel-Dateien", "*.xls"

fd.InitialFileName = ""

If fd.Show = -1 Then

Workbooks.Open (fd.SelectedItems(1))

End If



Gruss Thethos

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: