ich habe eine eigene Funktion gebastelt:
wie fange ich das fehlen eines Arguments ab? Ich möchte das auch gerne zulassen?
Public Function BLATTNAME(Nummer As Integer) As String
' Neuberechnungen aktivieren mit Application.Volatile
Application.Volatile
If Nummer ActiveWorkbook.Worksheets.Count Then
BLATTNAME = "-"
ElseIf Nummer = "" Then
BLATTNAME = ActiveWorkbook.ActiveSheet.Name
Else
BLATTNAME = ActiveWorkbook.Sheets(Nummer).Name
End If
End Function