title image


Smiley Re: Listenfeld dessen Zeilen = Blattnamen der Mappe
Hallo Andy,Du kannst so vorgehen:Symbolleiste Steuerelement-Toolbox einblendenSchaltfläche Kombinationsfeld anklickenKombinationsfeld zeichnenDoppelklick auf das Feld, dadurch wird der VBA-Editor geöffnetfolgenden Code eingeben:Private Sub ComboBox1_Change()[A1] = ComboBox1.TextEnd Sub(Zelle anpassen)Entwurfsmodus durch Klick auf linke Schaltfläche verlassenzum Editor wechseln (ggf. mit Alt und F11)Menü Einfügen - Modulfolgendes Makro eingeben:Sub test()Dim i%Sheets("Tabelle1").ComboBox1.ClearFor i = 1 To Sheets.Count Sheets("Tabelle1").ComboBox1.AddItem (Sheets(i).Name)NextEnd Sub(dient zum Füllen des Kombinationsfeldes)Durch den Aufruf des Makros test wird das Kombinationsfeld gefüllt; nach der Auswahl eines Blattes erscheint dieser im Beispiel in A1.Viele GrüßeJörg


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: