Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
920to924
920to924
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Sheet einlesen

Forumthread: Sheet einlesen

Sheet einlesen
27.10.2007 20:01:39
Kurt
Hey guten Abend,
möchte gern in meiner Combobox nur die Sheets einlesen die keine Nummer haben.
Meine Sheets können z.b. 1_hhhh oder 12_kkkName haben.
Also nur wenn der Buchstabe anfängt diese Sheets.
Hier mein Makro:
Dim sh As Worksheet
For Each sh In ThisWorkbook.Worksheets
If sh.Name Like ">12_" Then ComboBox1.AddItem sh.Name
Next sh
herzlichst Kurt P

Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Sheet einlesen
27.10.2007 20:05:00
Josef
Hallo Kurt,
If Not sh.Name Like "#*" Then ComboBox1.AddItem sh.Name

Gruß Sepp

Anzeige
Das war sehr SCHNELL u. Richtig Noch.
27.10.2007 20:17:00
Kurt
Hey Sepp,
klappt DANKE.
Noch eine Frage:
Wenn ich in der Tabelle z.b. Tabellenname: "Eingabe" in Zelle A1 den Namen einer bestimmten Tabelle
aufrufen möcht, zb. "Werkstatt", wie geht den das ?
gr Kurt P

AW: Das war sehr SCHNELL u. Richtig Noch.
27.10.2007 20:21:00
Josef
Hallo Kurt,
was verstehst du unter "Tabellennamen aufrufen" ?
Beschreib bitte genauer was du willst.
Gruß Sepp

Anzeige
AW: Das war sehr SCHNELL u. Richtig Noch.
27.10.2007 20:55:00
Kurt
Hey,
habe mehrer Tabellenblätter mit verschiedenen Namen, ich möchte gern, das man nur eine
bestimmte Tabelle/Sheet aktivieren kann, da Blattregister ausgeschaltet ist.
Der Name oder die Namen stehen in der Tabelle/Sheet in "Eingabe" in Zelle A1-A5 könnten also bis zu 5 stehen.
Jetzt soll also in der ComboBox d nur der Name der in der Zelle A1 bis A5 steht angezeigt werden
gr. Kurt P

Anzeige
AW: Das war sehr SCHNELL u. Richtig Noch.
27.10.2007 21:29:00
Josef
Hallo Kurt,
das geht zB. so.
For Each sh In ThisWorkbook.Worksheets
    If IsNumeric(Application.Match(sh.Name, _
        Sheets("Eingabe").Range("A1:A5"), 0)) Then _
        ComboBox1.AddItem sh.Name
Next sh

Man könnte das aber auch ganz ohne VBA mit Hyperlinks lösen.
Gruß Sepp

Anzeige
DANKE -)
27.10.2007 22:01:13
Kurt
Hey,
DANKE Sepp und Matthias für die Unterstützung,
gr Kurt P

AW: Das war sehr SCHNELL u. Richtig Noch.
27.10.2007 20:30:08
Matthias
Hallo
Ich tippe mal Du meinst so:
in ein Modul

Sub ml()
On Error GoTo Fehler
Worksheets(Worksheets("Eingabe").Range("A1").Value).Activate: Exit Sub
Fehler:
MsgBox "Tabelle mit diesem Namen ist nicht vorhanden"
End Sub


Userbild

Anzeige
@Kurt P .... ergänzende Erklärung ...
27.10.2007 20:54:48
Matthias
Hallo nochmal
Ich hatte vergessen zu schreiben, wie ich das meine
So hatte ich die Frage gedeutet.
Wenn also in A1 der Tabelle "Eingabe" ein TabellenBlattName steht, soll Excel zu diesem wechseln.
Hier das Beispiel
https://www.herber.de/bbs/user/47182.xls
oder meintest Du was ganz anderes?
Userbild
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige