Wie kann ich das 2 Tabellenblatt aktivieren

Forumthread: Wie kann ich das 2 Tabellenblatt aktivieren

12.02.2015 16:23:12

walter

Hallo zusammen,
wie kann ich das 2. Tabellenblatt (von Links gesehen) aktivieren.
Mit Abfrage, im welchen Tabellenblatt befinde ich mich ?
Grund:
Wenn ich in der 5 Sheet oder Tabelle5 bin möchte ich per
Makro in die 1.Tabelle der Datei wechseln bzw. aktivieren.
mfg Walter

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Wie kann ich das 2 Tabellenblatt aktivieren

12.02.2015 16:39:13

fcs

Hallo Walter,
du kannst direkt über die Index-Nr. Blätter aktivieren.
Vorsicht: Wenn Blätter Ausgeblendet sind, dann stimmt ggf. die sichtbare Blatt-Nr nicht mit der tatsächlichen überein.
Gruß
Franz

Sub Blatt_1_aktivieren()
Scheets(1).Activate
End Sub
Sub Blatt_2_aktivieren()
Scheets(2).Activate
End Sub

Super Franz kann...

12.02.2015 16:46:08

walter

Hallo Franz,
habe natürlich das C gelöscht.
Wie kann ich abfragen ob ich im Sheets(1) bin ?
Oder wo befinde ich mich ? Nicht Namen sondern Tabelle 1, 2 oder 3 usw. ?
Mfg Walter

AW: Wie kann ich das 2 Tabellenblatt aktivieren

12.02.2015 16:45:59

Michael

Hallo Walter!
Wenn Du wirklich eine Info über das aktuelle Blatt mit der Möglichkeit der Auswahl des 2. Tabellenblattes kombiniert haben willst, dann so:

Sub WoUndWeiter()
Dim Wo As String
Dim Info As String
Wo = ActiveSheet.Name
Info = MsgBox("Sie befinden sich in " & Wo & vbCrLf _
& vbCrLf & "Okay um zweites Blatt auszuwählen oder Abbrechen!", vbOKCancel, " _
Tabellensteuerung")
Select Case Info
Case Is = 1
Sheets(2).Select
Case Is = 2
GoTo Aus
End Select
Aus:
End Sub

Nebenbei: Brauchst Du das wirklich als Makro? Mit Rechtsklick auf die Scrollpfeile für Tabellenblätter unten links kannst Du jederzeit zu jedem Tabellenblatt springen...
LG
Michael

Ergänzung: Wie kann ich das 2 Tabellenblatt akti

12.02.2015 16:48:21

Michael

War etwas schnell vorher - die Wo-Variable kannst Du natürlich weglassen:

Sub WoUndWeiter()
Dim Info As String
Info = MsgBox("Sie befinden sich in " & ActiveSheet.Name & vbCrLf _
& vbCrLf & "Okay um zweites Blatt auszuwählen oder Abbrechen!", vbOKCancel, " _
Tabellensteuerung")
Select Case Info
Case Is = 1
Sheets(2).Select
Case Is = 2
GoTo Aus
End Select
Aus:
End Sub

Lg
Michael

Danke Michael perfekt -)

12.02.2015 17:01:51

Kurt

Dankeschön :-)

12.02.2015 17:05:37

Michael

LG
Michael

Infobox / Tutorial

Tabellenblatt in Excel aktivieren: So geht's

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Um ein spezifisches Tabellenblatt in Excel mit VBA zu aktivieren, kannst Du die folgende Schritt-für-Schritt-Anleitung befolgen:

Öffne den Visual Basic for Applications (VBA) Editor: Drücke ALT + F11 in Excel.
Füge ein neues Modul hinzu: Klicke mit der rechten Maustaste auf "VBAProject (DeineDateiName)", wähle "Einfügen" und dann "Modul".
Schreibe den VBA-Code: Füge den folgenden Code ein, um das 2. Tabellenblatt zu aktivieren:
```
Sub Blatt_2_aktivieren()
    Sheets(2).Activate
End Sub
```
Führe das Makro aus: Schließe den VBA-Editor und gehe zurück zu Excel. Du kannst das Makro nun ausführen, um das 2. Tabellenblatt zu aktivieren.

Häufige Fehler und Lösungen

Fehler: "Laufzeitfehler 9: Index außerhalb des gültigen Bereichs"
- Lösung: Stelle sicher, dass das angegebene Tabellenblatt tatsächlich existiert. Wenn beispielsweise nur ein Blatt vorhanden ist, wird der Fehler auftreten.
Fehler: Aktivierung eines ausgeblendeten Blattes
- Lösung: Überprüfe, ob das Blatt ausgeblendet ist. Du kannst es mit Sheets(2).Visible = True sichtbar machen.

Alternative Methoden

Es gibt verschiedene Möglichkeiten, ein Tabellenblatt zu aktivieren:

Mit dem Namen des Blattes:

Sub Blatt_Namen_aktivieren()
    Sheets("Tabelle2").Activate
End Sub

Über die Indexnummer: Wie bereits gezeigt, kannst Du die Indexnummer verwenden, um ein Blatt zu aktivieren.
Direkt über die Benutzeroberfläche: Klicke mit der rechten Maustaste auf die Pfeile unten links in Excel, um zu einem bestimmten Blatt zu springen.

Praktische Beispiele

Hier sind einige praktische Beispiele, wie Du die Aktivierung eines Tabellenblattes umsetzen kannst:

Aktiviere das erste Blatt, wenn Du im fünften Blatt bist:

Sub WechselZumErstenBlatt()
    If ActiveSheet.Index = 5 Then
        Sheets(1).Activate
    End If
End Sub

Frage das aktuelle Blatt ab und wechsle zum zweiten Blatt:

Sub WoUndWeiter()
    Dim Info As String
    Info = MsgBox("Du befindest dich in " & ActiveSheet.Name & vbCrLf & _
                  vbCrLf & "Okay um das zweite Blatt auszuwählen oder Abbrechen!", vbOKCancel, "Tabellensteuerung")
    If Info = vbOK Then
        Sheets(2).Activate
    End If
End Sub

Tipps für Profis

Verwende Fehlerbehandlung in Deinem VBA-Code, um unerwartete Fehler abzufangen.
Nutze Kommentare im Code, um die Funktionalität zu erklären, insbesondere wenn Du mit anderen an dem Projekt arbeitest.
Experimentiere mit Benutzerdefinierten Dialogen (UserForms), um die Benutzererfahrung zu verbessern.

FAQ: Häufige Fragen

1. Wie kann ich überprüfen, in welchem Tabellenblatt ich mich befinde?
Du kannst den Namen des aktiven Blattes mit ActiveSheet.Name abfragen.

2. Ist es notwendig, ein Makro zu verwenden, um zwischen Tabellenblättern zu wechseln?
Nicht unbedingt. Du kannst auch manuell über die Benutzeroberfläche in Excel zwischen den Blättern navigieren. Ein Makro ist jedoch nützlich, wenn Du häufig zwischen bestimmten Blättern wechseln musst oder zusätzliche Logik benötigst.

Beliebteste Forumthreads (12 Monate)

Wie kann ich das 2 Tabellenblatt aktivieren

Forumthread: Wie kann ich das 2 Tabellenblatt aktivieren

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Infobox / Tutorial

Tabellenblatt in Excel aktivieren: So geht's

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

Wie kann ich das 2 Tabellenblatt aktivieren

Forumthread: Wie kann ich das 2 Tabellenblatt aktivieren

6 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Tabellenblatt in Excel aktivieren: So geht's

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread