Funktion Tabellen Blattname
25.08.2006 15:18:32
Mike
ich brauche Eure Spührnasen.
Ich brauche eine Funktion, die ich in verschiedenen Exceltabellen etc verwenden kann und welche mir den Tabellennamen zur Verfügung stellt.
Hier meine Funktion:
Function Tabellenname(Optional TabellenNr As Integer = 0) As String
If TabellenNr = 0 Then
Tabellenname = ActiveSheet.Name
Else
Tabellenname = Sheets(TabellenNr).Name
End If
End Function
Mein Problem ist, dass nicht immer die richtige Tabelle gezogen wird.
Eigentlich sollte der Eintrag =Tabellenname() in der Zelle A1 dort den Tabellennamen ausgeben. Aber manchmal ist es der Name einer anderen Tabelle bzw die Funktion wird nicht berechnet. Obwohl ich ein application.calcfull durchführe.
Mein pc ist wohl verhext.
Gruß
Mike René
Anzeige