Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
16.10.2025 17:25:38
bedingte Formatierung
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
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
388to392
388to392
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro für den Namen eines Tabellenblattes

Forumthread: Makro für den Namen eines Tabellenblattes

Makro für den Namen eines Tabellenblattes
03.03.2004 10:46:48
Hartmut
Hallo,
ich weiß, dass ich diese Frage schon einmal gestellt habe. Aber leider hat es bei mir nicht funktioniert....
Also ich möchte, dass ein Makro automatisch das Feld, das in A1 steht als Namen des Tabellenblattes ausgibt.
Vielen Dank
Hartmut
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro für den Namen eines Tabellenblattes
03.03.2004 11:16:57
Bertram
Hallo Hartmut,
probier's mal so:


Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address(False, False) = "A1" Then
    ActiveSheet.Name = [A1].Value
End If
End Sub

     Code eingefügt mit Syntaxhighlighter 2.5

Gruß
Bertram
Anzeige
AW: Makro für den Namen eines Tabellenblattes
03.03.2004 11:45:34
Hartmut
Hallo,
danke erst einmal.
Ich bekomme dann aber immer als Fehlermeldung: Fehler beim Kompilieren. End Sub erwartet.
Hartmut
AW: Makro für den Namen eines Tabellenblattes
03.03.2004 11:52:57
Bertram
Hi,
hast du den Code so abgeschrieben/kopiert wie er da steht?
Zeig mal was du hast.
Gruß
Bertram
AW: Makro für den Namen eines Tabellenblattes
03.03.2004 12:01:34
Hartmut
Hallo,
wenn ich das Makro einbinde, sieht es so aus:
Sub test()

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address(False, False) = "A1" Then
ActiveSheet.Name = [A1].Value
End If
End Sub

End Sub


Gruß
Hartmut
Anzeige
AW: Makro für den Namen eines Tabellenblattes
03.03.2004 12:06:14
Bertram
Hi,
so geht's nicht. So hast du ja ein Makro im Makro.
Du mußt meinen Code (hierbei handelt es sich um ein Ereignis) in das Tabellenblatt in dem es funktionieren soll einfügen. Doppelklicke dazu im VBA-Editor im VBA-Projekt auf das entsprechende Tabellenblatt und füge den Code ein.
Gruß
Bertram
Anzeige
AW: Makro für den Namen eines Tabellenblattes
03.03.2004 12:19:38
Hartmut
Hallo,
aha. So langsam komme ich der Sache näher...
Ich habe aber leider immer noch ein Problem. WEnn ich es ausführen will, braucht er ein Makro...
Vielen Dank
Hartmut
AW: Makro für den Namen eines Tabellenblattes
03.03.2004 12:25:04
Bertram
Hi,
wie meinst du das '...WEnn ich es ausführen will, braucht er ein Makro...'?
Wenn der Code an der richtigen Stelle eingefügt ist, wird es automatisch ausgelöst, wenn sich der Inhalt der Zelle A1 ändert. Sieh dir auch mal z.B. den Eintrag 'Worksheet-Objektereignisse' in der Onlinehilfe an.
Gruß
Bertram
Anzeige
mir ist ein Licht aufgegangen...
03.03.2004 12:45:36
hartmut
Hallo,
super. So wollte ich es haben.
Vielen Dank
Hartmut
Gerne:-) oT
03.03.2004 12:57:37
Bertram
;

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