Hallo,
leider konnte ich trotz Suche keine Antwort auf mein Problem finden.
Ich möchte, dass der Name des Registers (da steht beim Öffnen von Excel Standardmäßig „Tabelle 1“ „Tabelle2“ usw.) in eine Zelle übernommen wird. Z.B. A1=Registername.
Wer weiss was?
Gruss
Stefan
Hallo Stefan,
Die Formel Adresse müsste sowas erledigen können
Gruss
Alex
Ich möchte, dass der Name des Registers (da steht beim Öffnen
von Excel Standardmäßig „Tabelle 1“ „Tabelle2“ usw.) in eine
Zelle übernommen wird. Z.B. A1=Registername.
Hi Stefan,
A1: =TabName()
im VBa Editor in ein modul:
Function TabName()
TabName = ActiveSheet.Name
End Function
Gruß
Reinhard
Ich möchte, dass der Name des Registers (da steht beim Öffnen
von Excel Standardmäßig „Tabelle 1“ „Tabelle2“ usw.) in eine
Zelle übernommen wird. Z.B. A1=Registername.
Hi Stefan,
A1: =RECHTS(ZELLE(„Dateiname“);LÄNGE(ZELLE(„Dateiname“))-FINDEN("]";ZELLE(„Dateiname“)))
Klappt dannn wenn Datei mal gespeichert wurde, vorher bekommt man #Wert.
Gruß
Reinhard
Hallo Stefan,
Die Formel Adresse müsste sowas erledigen könnenGruss
Alex
Hi Alex,
nein, Adresse ist nicht richtig.
Gruß
Reinhard
Hi Stefan,
A1: =TabName()im VBa Editor in ein modul:
Function TabName()
TabName = ActiveSheet.Name
End FunctionGruß
Reinhard
Danke schon mal. Ich habe das so übernommen - klappt natürlich nicht. 
Kenne nämlich Visual Basic nicht. Aber ich kenne einen der es kennt, den werde ich interviewen. Dann wird es wohl klappen.
Vielen Dank!
gruss
stefan
Danke schon mal. Ich habe das so übernommen - klappt natürlich
nicht.
einen der es kennt, den werde ich interviewen. Dann wird es
wohl klappen.
Hi Stefan,
dann nimm halt meine andere Lösung.
Oder als Anschubbs zu VBA, Alt+F11, im VB-Editor dann Einfügen----Modul—dort dann den nachfolgenden Code reinkopieren, VB-Editor schliessen. Das wars schon.
In Excel rufst du die Funktion wie jede andere Funktion auf, also direkt in die Zelle schreiben, oder Einfügen—Funktion—Benutzerdefiniert—Tabname…
Gruß
Reinhard
Function TabName()
TabName = ActiveSheet.Name
End Function