title image


Smiley Re: Listbox mit Arbeitsblattnamen füllen
Hi,



Function Laden()

Dim Sh As Object

For Each Sh In ActiveWorkbook.Sheets

If Sh.Index > 5 Then ListBox1.AddItem Sh.Name

Next

End Function



Oder die Sheets direkt mit ihrem Index von 6 bis... ansprechen (über eine Zählvariable steuern).




Grüße Boris

EXCELFORMELN die ultimative Formelseite

Seit Oktober 2006 ist es da: EXCEL - Das Zauberbuch

geschrieben von


Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: