Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
732to736
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
732to736
732to736
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Funktion für Name Tabellenblatt (nicht nur aktives

Funktion für Name Tabellenblatt (nicht nur aktives
Peter
Hallo
Wenn ich den Dateinamen in eine Zelle einer Tabelle schreiben will, kann ich dies mit folgender Funktion bewerkstelligen (auf http://held-office.de gefunden).

Function DateiName()
DateiName = ActiveWorkbook.Name
End Function

Eingabe in Tabelle:
=DateiName()
Gibt es eine analoge Funktion, die mir den Namen des jeweiligen Sheets ausgibt? Es darf sich jedoch nicht auf das aktuelle Sheet beziehen, sonst erscheint ja bei gleichzeitigem Ausdruck aller Tabellen eines Worksbooks der Name nur in einer Tabelle korrekt.
Kann mir jemand weiterhelfen?
Danke, Peter

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Funktion für Name Tabellenblatt (nicht nur aktives
ransi
hallo
versuch mal...
Option Explicit
Public

Function blattname()
blattname = Application.ThisCell.Parent.Name
End Function

ransi
AW: Funktion für Name Tabellenblatt (nicht nur aktives
15.02.2006 21:48:19
Nepumuk
Hallo ransi,
was bitte ist ThisCell ?
Gruß
Nepumuk

mT
15.02.2006 21:53:56
Achim
Ab Excel 2002
ThisCell-Eigenschaft
Siehe auch Betrifft Beispiele Zusatzinfo
Gibt die Zelle zurück, von der aus die benutzerdefinierte Funktion als Range-Objekt aufgerufen wird.
Ausdruck.ThisCell
Ausdruck Erforderlich. Ein Ausdruck, der eines der Objekte der Liste Betrifft zurückgibt.
Anmerkung
Benutzer sollten nicht auf Eigenschaften oder Methoden des Range-Objekts zugreifen, wenn sich dieses in benutzerdefinierten Funktionen befindet. Die Benutzer können das Range-Objekt zur späteren Verwendung zwischenspeichern und zusätzliche Aktionen durchführen, wenn die Neuberechnung abgeschlossen ist.
Beispiel
In diesem Beispiel enthält die Funktion mit der Bezeichnung "UseThisCell" die ThisCell-Eigenschaft, um dem Benutzer die Zelladresse mitzuteilen.

Function UseThisCell()
MsgBox "The cell address is: " & _
Application.ThisCell.Address
End Function

mfg Achim
Anzeige
AW: mT
15.02.2006 21:55:59
Nepumuk
Hallo Achim,
danke. Das gibts in xl2000 noch nicht.
Gruß
Nepumuk

AW: Funktion für Name Tabellenblatt (nicht nur aktives
ransi
hallo nepumuk
"was bitte ist ThisCell ?"
Dacht erst du wolltest mich locken....
Bis du dann geschrieben hast das es das in XL2000 noch nicht gibt.
Ich denke aber da geht bestimmt auch was mit application.caller. (wenns das denn schon in excel9.0 gibt).
ransi
AW: Funktion für Name Tabellenblatt (nicht nur aktives
15.02.2006 22:38:49
Nepumuk
Hallo ransi,
"Application.Caller" hätte ich benutzt.
Function blattname()
    blattname = Application.Caller.Parent.Name
End Function

Gruß
Nepumuk

Anzeige
AW: Funktion für Name Tabellenblatt (nicht nur aktives
16.02.2006 09:39:52
Peter
Hallo Ransi
Vielen Dank!
Ich nehme an, dass ich schreiben muss
Public Function blattname()
und nicht
Public
Function blattname()
So klappt es jedenfalls bei mir.
Nochmals besten Dank
Peter

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige