Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Tabellenblatt fixieren / hinten anhängen

Tabellenblatt fixieren / hinten anhängen
19.12.2017 13:03:31
Kevin
Moin Moin! ;-)
Weiß zufällig jemand wie man ein bestimmtes Tabellenblatt in einer Datei so fixieren kann, dass es immer an letzter Stelle in der Leiste unten steht? Also auch dann, wenn beispielsweise ein weiteres Tabellenblatt hinzugefügt wird.
Sowas habe ich in einer Datei schon einmal gesehen, finde aber die Lösung dafür nicht. Vielleicht gibt es ja eine ganz einfache Funktion/Regel dazu, habe es bisher noch nicht gebraucht...
Lieben Gruß
Kevin
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblatt fixieren / hinten anhängen
19.12.2017 13:20:28
Werner
Hallo Kevin,
das im Worksheet Activate von Diese Arbeitsmappe
WorkSheets("Blattname").Move After:=WorkSheets(.Sheets.Count)
Gruß Werner
AW: Tabellenblatt fixieren / hinten anhängen
19.12.2017 13:27:38
Kevin
Hallo Werner,
ich habe es nun unter "DieseArbeitsmappe" eingefügt und den Namen auf "Statistik" geändert. Das Tabellenblatt "Statistik" soll immer hinten anhängen.
Nun zeigt er mir folgendes an:
"Fehler beim Kompilieren: Unzulässiger oder nicht ausreichend definierter Verweis"
Da habe ich wohl einen Bug eingebaut..
Anzeige
AW: Tabellenblatt fixieren / hinten anhängen
19.12.2017 17:13:56
Kevin
Ich habe jetzt nochmal alles irgendwie probiert und habe versucht es zu lösen - keine Chance.
Noch eine Idee oder einen Verbesserungsvorschlag? :-)
AW: Tabellenblatt fixieren / hinten anhängen
20.12.2017 08:08:28
Werner
Hallo Kevin,
nein, ein Fehler von mir:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Set ws = ActiveSheet
Worksheets("Statistik").Move After:=Sheets(Sheets.Count)
Application.EnableEvents = False
ws.Activate
Application.EnableEvents = True
End Sub
Gruß Werner
Anzeige
AW: Tabellenblatt fixieren / hinten anhängen
23.12.2017 09:07:44
Kevin
Hallo Werner, vielen lieben Dank, es hat funktioniert! Nun stellt sich das Tabellenblatt fein wie gewollt immer hinten an - sobald die Datei das nächste Mal geöffnet wird. Gibt es zufällig die Möglichkeit eine Datei bei dem Klick auf den CmB automatisch zu aktualisieren?
Gruß
Kevin
AW: Tabellenblatt fixieren / hinten anhängen
23.12.2017 15:28:23
Werner
Hallo Kevin,
was meinst du mit "aktualisieren"?
Gruß Werner
Anzeige
AW: Tabellenblatt fixieren / hinten anhängen
23.12.2017 15:36:30
Kevin
Ich meine das so, dass sich die Datei bei Klick dann quasi einmal neu startet bzw. sich das Tabellenblatt neu lädt
AW: Tabellenblatt fixieren / hinten anhängen
23.12.2017 16:38:44
Werner
Hallo Kevin,
erklär doch mal was du damit erreichen willst.
Gruß Werner
;
Anzeige
Anzeige

Infobox / Tutorial

Tabellenblatt fixieren und hinten anhängen in Excel


Schritt-für-Schritt-Anleitung

Um ein Excel Tabellenblatt zu fixieren und sicherzustellen, dass es immer am Ende der Leiste angezeigt wird, kannst du folgenden VBA-Code verwenden:

  1. Öffne deine Excel-Datei und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Doppelklicke auf „DieseArbeitsmappe“ im Projekt-Explorer.

  3. Füge den folgenden Code ein:

    Private Sub Workbook_SheetActivate(ByVal Sh As Object)
       Set ws = ActiveSheet
       Worksheets("Statistik").Move After:=Sheets(Sheets.Count)
       Application.EnableEvents = False
       ws.Activate
       Application.EnableEvents = True
    End Sub
  4. Stelle sicher, dass du "Statistik" durch den Namen deines gewünschten Tabellenblatts ersetzt.

  5. Speichere die Datei als Makro-fähige Arbeitsmappe (.xlsm).

  6. Schließe den VBA-Editor und teste die Funktion, indem du die Datei neu öffnest.


Häufige Fehler und Lösungen

Fehler: "Fehler beim Kompilieren: Unzulässiger oder nicht ausreichend definierter Verweis"

  • Lösung: Überprüfe, ob der Blattname korrekt ist und keine Tippfehler enthält. Stelle sicher, dass das Arbeitsblatt existiert.

Fehler: VBA-Code wird nicht ausgeführt

  • Lösung: Stelle sicher, dass die Makros in deiner Excel-Anwendung aktiviert sind. Gehe zu Datei > Optionen > Sicherheitscenter > Einstellungen für das Sicherheitscenter > Einstellungen für Makros, und aktiviere die Makros.

Alternative Methoden

Falls du lieber ohne VBA arbeiten möchtest, kannst du das Excel Arbeitsblatt manuell an die gewünschte Position verschieben. Das ist jedoch nicht automatisiert und muss jedes Mal manuell durchgeführt werden, wenn ein neues Blatt hinzugefügt wird.

  1. Klicke mit der rechten Maustaste auf die Registerkarte des gewünschten Arbeitsblattes.
  2. Wähle „Verschieben oder Kopieren“.
  3. Wähle „Ans Ende“ aus dem Dropdown-Menü.

Praktische Beispiele

Ein Beispiel zur Veranschaulichung:

Wenn du das erste Tabellenblatt "Daten" und das zweite Blatt "Statistik" hast, kannst du durch den VBA-Code sicherstellen, dass "Statistik" immer ganz hinten angehängt wird, egal wie viele weitere Blätter du hinzufügst.

Worksheets("Statistik").Move After:=Sheets(Sheets.Count)

Das sorgt dafür, dass "Statistik" immer an letzter Stelle in der Excel Leiste fixiert bleibt.


Tipps für Profis

  • Nutze die Application.EnableEvents = False und Application.EnableEvents = True Befehle, um unerwünschte wiederholte Ausführungen des Codes während der Blattaktivierung zu vermeiden.
  • Teste den Code in einer Kopie deiner Datei, um unerwünschte Änderungen zu vermeiden.
  • Dokumentiere deinen VBA-Code, um später leichter nachvollziehen zu können, was jeder Abschnitt bewirken soll.

FAQ: Häufige Fragen

1. Kann ich mehrere Tabellenblätter gleichzeitig fixieren?
Nein, der VBA-Code ist so konzipiert, dass nur ein einzelnes Blatt an die letzte Position verschoben wird. Du kannst jedoch den Code für jedes Blatt anpassen.

2. Funktioniert dieses Verfahren in allen Excel-Versionen?
Ja, der VBA-Code sollte in Excel-Versionen ab 2007 funktionieren, solange du die richtige Makro-Einstellungen hast.

3. Wie kann ich ein fixiertes Blatt wieder an eine andere Position verschieben?
Du kannst den VBA-Code anpassen, indem du die Zeile mit Move After änderst oder den Code einfach löscht, um die manuelle Anordnung zu ermöglichen.

Beliebteste Forumthreads (12 Monate)

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