title image


Smiley Re: bestimmte offene Excel - Dateien in ComboBox anzeigen und auswählen.
Hi,



die persönliche Mappe soll bestimmt nicht angezeigt werden, oder?



Option Explicit

Sub Mappe_suchen()

Dim wb As Workbook

For Each wb In Workbooks

If wb.Name "Mappe_suchen.xls" And _

wb.Name "personl.xls" Then

Userform1.ComboBox1.AddItem Workbooks(wb).Name

End If

Next

Userform1.Show

End Sub



mfg E.

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: