Relativer Bezug auf Tabellenblätter

Hallo,

ich möchte einen relativen Bezug auf das vorherige Tabellenblatt nutzen, um in einer Zelle des letzten Arbeitsblattes die Nummer dieses aktuellen Tabellenblattes anzeigen zu lassen.

Wer hat Vorschläge?

Besten Dank,
Martin

ich möchte einen relativen Bezug auf das vorherige
Tabellenblatt nutzen, um in einer Zelle des letzten
Arbeitsblattes die Nummer dieses aktuellen Tabellenblattes
anzeigen zu lassen.

Hi Martin,
ich verstehs noch nicht ganz, bzw ist mir mehrdeutig. Du hast Tabelle1, Tabelle2, Tabelle3. Soll in A1 von Tabelle3 eine 2 stehen?
Gruß
Reinhard

Hallo Reinhard,

im dritten Tabellenblatt (Tabelle3) soll in einer Zelle eine 3 zu lesen sein …

Gruß
Martin

im dritten Tabellenblatt (Tabelle3) soll in einer Zelle eine 3
zu lesen sein …

Hi Martin,
Rechtsklick auf den Tabellennamen, Code anzeigen, nachfolgenden Code reinkopieren, Editor schliessen.
Der Code funktioniertr für alle Tabellenblätter, du musst ihn halt nur in die gewünschten Blätter wie beschrieben einfügen.
Gruß
Reinhard

Option Explicit
Private Sub Worksheet\_Activate()
Dim n As Integer
For n = 1 To Worksheets.Count
 If Worksheets(n).Name = ActiveSheet.Name Then Range("A1") = n
Next n
End Sub

Hallo Martin,

im dritten Tabellenblatt (Tabelle3) soll in einer Zelle eine 3
zu lesen sein …

Wenn deine Tabelle den Namen „Tabelle3“ hat dann kannst du mit folgender Formel die drei in einer Zelle anzeigen:

=Rechts(ZELLE(„Dateiname“;A1);1)

Gruß
Franz

mistige Excel-Hilfe :frowning:

Wenn deine Tabelle den Namen „Tabelle3“ hat dann kannst du mit
folgender Formel die drei in einer Zelle anzeigen:
=Rechts(ZELLE(„Dateiname“;A1);1)

Hallo Franz,
das muss man aber wissen, denn die Hilfe zu Zelle sagt:
„Dateiname“
Dateiname (und vollständiger Pfad) der Datei, die Verweis enthält, als Text. Gibt eine leere Textzeichenfolge ("") zurück, wenn das Tabellenblatt, das Verweis enthält, noch nicht gespeichert wurde.

Mir nicht ersichtlich dass da was von Tabellenblattname steht :frowning:
Naja, wieder was gelernt :smile:
Gruß
Reinhard

Hallo Franz,

sehr gute Funktion!
Da das tabellenformat aber mit einer klammer abschließt, wärs nicht schlecht, direkt eine Stelle auszulesen, und nicht nur die letzen stellen. gibt es solch eine funktion?
aber das kann man ja mit der funktion „links“, wie ich gerade sehe!

sehr gut,
vielen dank!

Martin

Da das tabellenformat aber mit einer klammer abschließt, wärs
nicht schlecht, direkt eine Stelle auszulesen, und nicht nur
die letzen stellen. gibt es solch eine funktion?
aber das kann man ja mit der funktion „links“, wie ich gerade
sehe!
sehr gut,
vielen dank!

Hi Martin,
mir völlig unklar welche Klammer du meinst, die Funktion arbeitet doch korrekt und wie du mit =links() „direkt eine Stelle“ ausliest.
Ich würde dazu =Teil() nehemn.
Gruß
Reinhard

Neue Mappen werden standardmäßig mit „Tabelle (2)“, „Tabelle (3)“, … . Unser Beipiel am Anfang war ohne Klammer.

die „Teil“-Funktion ist noch besser.

Grüsse,
Martin

Hallo Rheinhard,

das muss man aber wissen, denn die Hilfe zu Zelle sagt:
„Dateiname“

Hab ich ja auch erst bei einer Anwendung der Funktion herausgefunden.

Hier noch ein paar Formeln, mit denen man Informationen zur Datei und Tabelle ermitteln kann.
Dabei kann eine beliebige Zelle in die Formel eingesetzt werden, auch die Zelle, in der die Formel steht.

Tabellenblattname: Formeln

 A 
19 Aktuelles Verzeichnis 
20 C:\Eigene Dateien\Dokumente\ 
21 Dateiverzeichnis 
22 C:\PROGRAMME\MICROSOFT OFFICE\OFFICE\XLSTART\ 
23 Dateiname mit Pfadangabe 
24 C:\PROGRAMME\MICROSOFT OFFICE\OFFICE\XLSTART\EXCEL\_Specials.xls 
25 Dateiname ohne Pfadangabe 
26 EXCEL\_Specials.xls 
27 Tabellenname mit Pfadangabe in Formeln 
28 C:\PROGRAMME\MICROSOFT OFFICE\OFFICE\XLSTART\[EXCEL\_Specials.xls]Formeln 
29 Tabellenname 
30 Formeln 

Benutzte Formeln:
A20: =INFO("Verzeichnis")
A22: =LINKS(ZELLE("Dateiname";A22);FINDEN("[";ZELLE("Dateiname";A22);1)-1)
A24: =LINKS(ERSETZEN(ZELLE("Dateiname";A24);FINDEN("[";ZELLE("Dateiname";A24);1);1;"");FINDEN("]";ZELLE("Dateiname";A24);1)-2)
A26: =TEIL(ZELLE("Dateiname";A26);FINDEN("[";ZELLE("Dateiname";A26);1)+1;FINDEN("]";ZELLE("Dateiname";A26);1)-((FINDEN("[";ZELLE("Dateiname";A26);1)+1)))
A28: =ZELLE("Dateiname";A28)
A30: =TEIL(ZELLE("Dateiname";A30);FINDEN("]";ZELLE("Dateiname";A30);1)+1;255)

ach, diese Klammer, merci o.w.T

@Moderator: Ich finde das gehört in die FAQ …
Hallo Franz,
…und natürlich in die Excel-Hilfe zu Zelle, finster nach Redmont (oder Redmond?) zu Bill schaue :smile:
Gruß
Reinhard
ps: Mir ist völlig unklar ob der derzeitige Moderator jetzt Alex oder Norbert ist.
Davon unabhängig wäre es mir sehr lieb wenn der Moderator auf Postings in denen er als Moderator erwähnt wird ein Feedback gibt, egal ob Zustimmung oder Ablehnung zu Vorschläen, Hauptsache Feedback mit Begründung.
Wäre echt Klasse.