Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1972to1976
1972to1976
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Gehe zu Tabellenblatt

Forumthread: Gehe zu Tabellenblatt

Gehe zu Tabellenblatt
23.04.2024 14:23:45
Thomas
Hallo zusammen

Ich brauche mal wieder Eure Hilfe :-)

Ich habe eine Userform mit einer TextBox1 und einem CommandButton3.

Ich möchte in der TextBox1 den Namen des Tabellenblattes eingeben und mit dem CommandButton3 dort hinspringen.

Wie würde dazu den Code aussehen?

Danke schön.

Gruß Thomas
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Gehe zu Tabellenblatt
23.04.2024 14:38:44
Oberschlumpf
Hi,

versuch...

Sheets(TextBox1.Text).Activate

Ciao
Thorsten
AW: Gehe zu Tabellenblatt
23.04.2024 14:41:44
Thomas
Hatte gerade diesen Code gefunden, schade nur, das man keine Meldung bekommt, wenn das Tabellenblatt nicht gefunden wurde. 

Private Sub CommandButton1_Click()

'suchen nach Tab.blatt

Application.ScreenUpdating = False

On Error Resume Next

Dim wks As Worksheet

Dim strWKS As String

strWKS = TextBox1.Value

For Each wks In Worksheets

If strWKS = "" Then Exit Sub

If InStr(UCase(wks.Name), UCase(strWKS)) > 0 Then

'wks.Visible = True

wks.Activate

Exit For

End If

Next wks

Application.ScreenUpdating = True

End Sub
Anzeige
AW: Gehe zu Tabellenblatt
23.04.2024 14:46:25
Oberschlumpf
Hi,

änder diese Zeile... 


Dim strWKS As String

...um in... 


Dim strWKS As String, lboExist As Boolean

...und ersetz diesen Code... 


wks.Activate

Exit For

End If

Next wks

...durch diesen Code 


wks.Activate

lboExist = True

Exit For

End If

Next wks

If lboExist = False Then

MsgBox "Blatt nicht vorhanden"

End If


Hilfts?

Ciao
Thorsten
Anzeige
AW: Gehe zu Tabellenblatt
23.04.2024 14:59:55
daniel 
dim ws as worksheet

if Textbox1.Text > "" then

    for each ws in Activeworkbook.worksheets

        if ws.name = Textbox1.text then exit for

    next

    if ws is nothing then

        msgbox "Blatt nicht vorhanden"

    else

       ws.Select

    end if

else

     Msgbox "Bitte Blattname eingeben"

end if

Gruß Daniel
Anzeige
AW: Gehe zu Tabellenblatt
24.04.2024 08:15:58
Thomas
Funktioniert.
Danke schön.
;

Forumthreads zu verwandten Themen

Zellwert auf anderes Tabellenblatt übernehmen
Jan

Hallo zusammen
ich habe in den Zellen A10:A10010 diverse Werte stehen. Jetzt möchte ich, dass wenn man auf so einen Wert draufklickt, in der Zelle A8 eines anderen Tabellenblattes genau dieser Wert erscheint... Ist das irgendwie machbar mit einem Makro oder so? Wenn ja, dann wäre ich um jed...
10.03.2009 15:49:15
Thread-ID: 1058747
9 Beiträge
Commanbutton auf Tabellenblatt einfügen
MichaV

Hallo,
kann mir bitte jemand sagen wie in XL2007 eine Taste (CommandButton) in einem Tabellenbaltt (also nicht auf einer UserForm) eingefügt wird? Ich finds nicht raus, grrr...
Grusz- Micha
03.03.2010 22:57:07
Thread-ID: 1143166
4 Beiträge
Verweis auf anderes Tabellenblatt
Werner

Hallo Excel-Freunde
Habe das Problem zwischenzeitlich mit Hilfe von Erich aus Kamp-Lintfort gelöst.
Habe dafür folgendes verwendet:
04
N
5 4721
Formeln der Tabelle
Zelle Formel
N5 =INDIREKT(TEXT(TEIL(ZELLE("Filename";A1); FINDEN("]";ZELLE("Filename";A1))+1;25...
07.03.2010 11:51:45
Thread-ID: 1144071
3 Beiträge
Anzeige
verschiedenen Tabellenblätter zusammenführen VBA
andreas

Hallo zusammen,
ich möchte jeweils beim öffnen der Tabelle die Werte in Blatt1 löschen und dann die Werte aus Blatt2,Blatt3 usw. neu in Blatt1 einlesen und nach Spalte 1 sortieren.
habe leider keinen Ansatz dazu und bin deshalb für jede Hilfe dankbar.
Gruß Andreas
08.06.2010 13:02:40
Thread-ID: 1160815
3 Beiträge
Zugriff auf anderes Tabellenblatt
TommiH

Hallöchen,
nur eine kurze Frage, ich habe 2 Arbeitsblätter (A und B). In B sind rund 5000 Zeilen, die in der ersten Spalte eine Referenznummer haben.
Nun bearbeite ich die Daten in Blatt A und muss immer wieder in Blatt B nachschauen, ob zu der aktuellen Nummer in Blatt B ein Text bei d...
05.09.2011 13:54:40
Thread-ID: 1228662
4 Beiträge
Buttons auf einer Multipage in einem Tabellenblatt
Christoph

Hallo,
ich suche und suche aber finde keine Loesung. Ich habe in einem Tabellenblatt (wohlgemerkt kein UserForm) eine Multipage angelegt (Microsoft Forms 2.0 Multipage) und danach darauf einen Button plaziert. Jedoch will es mir nicht gelingen diesen mit einem VBA-Code zu versehen.Ich suche...
08.06.2002 00:47:11
Thread-ID: 127014
2 Beiträge
Makro Verweis auf anderes Tabellenblatt
Michael

Hallomein Makro "Daten schreiben" von Zelleninhalten funtkioniert innerhalb eines Tabellenblattes.
Jetzt will ich aber die Schaltfläche auch auf einem anderen Tabellenblatt integrieren mit der selben Funktionalität.Mein Code ist:
Set Datenbank = OpenDatabase(Dateiname)
Set Date...
04.07.2002 15:13:07
Thread-ID: 133889
2 Beiträge
Code anpassen-Zugriff auf anderes Tabellenblatt
Bon

Hallo zusammen,
ich habe ein Problem, dass für euch Experten sicher kein Problem darstellt:
Ich habe einen Code gefunden und möchte ihn nun so anpassen, dass er nicht auf das aktuelle Tabellenblatt, sondern auf ein anderes zugreift.
Der Command Button ist in Tabelle1 der Zieldatei,...
09.07.2014 15:36:13
Thread-ID: 1369523
3 Beiträge
Anzeige
Verweis auf anderes Tabellenblatt mit zwei Spalten
Burghard

Hallo,
ich möchte von dem Tabellenblatt 2 auf das Tabellenblatt 1 verweisen (Suchkriterium dort in Spalte E = Name-1, in Spalte F = Name-2), im Tabelle 2 (Ergebnistabellenblatt) steht in Spalte E= Name-2, in Spalte F = Name-1. Der zuzuordnende Begriff steht in Tabelle 1 in Spalte G und soll...
01.02.2015 16:30:47
Thread-ID: 1406548
5 Beiträge
Anzeige
Datensätze auf anderes Tabellenblatt übertragen
puma_888

Hallo zusammen,
ich möchte aus dem Tabellenblatt "Produktvergleich" Daten an das Tabellenblatt "Vergleichsformular" durch klick des CommandButton1 übergeben. Es sollen jedoch nur die Daten von den Zellen übergeben werden, bei denen eine Checkbox davor markiert ist, alle anderen Daten sollen...
31.03.2015 13:57:13
Thread-ID: 1418229
12 Beiträge
Verweise auf ein anderes Tabellenblatt lenken
Ingo

Moin zusammen,
ich habe eine Excel Arbeitsmappe mit mehreren Tabellenblättern. In einem Blatt sind mehre Verweise in Formeln auf ein anderes Tabellenblatt. Es handelt sich um Dienstpläne, die sich Daten aus dem Blatt "2015" holen. Der Dienstplan soll sich aber nun zukünftig Daten aus einem...
28.12.2015 11:32:57
Thread-ID: 1466176
6 Beiträge
VBA Suchfeld (gehe zu)
Michael

Hallo zusammen,
ich habe eine ziemlich große Excelliste mit Artikelnummern, Namen, Preisen, ...
Nun wollte ich für die vereinfachte Suche über die Liste ein Suchfeld setzen. Ähnlich der Funktion Strg + F ...
In A1 soll eine Artikelnummer eingegeben werden und daneben eine Artikel S...
26.01.2016 20:17:54
Thread-ID: 1471309
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige