[VBA] Funktion nicht ausführbar?
23.03.2020 10:06:23
Nils
ich habe eine Verständnisfrage, warum kann ich diese Funktion nicht ausführen?
Die Funktion ist in einem Modul mit 'Option Explicit', andere Funktionen im gleichen Modul kann ich ausführen (F5) nur diese eben nicht. Die Funktion funktioniert und kann in anderen Subs verwendet werden, aber warum kann man sie nicht direkt ausführen?
Wenn mir das jemand erklären kann, wäre ich sehr dankbar.
Nils
Public Function SHEETNAME(Optional intNumber As Integer) As String
' Function to output the name of the worksheet
Application.Volatile
If intNumber ActiveWorkbook.Worksheets.Count Then
SHEETNAME = "-"
ElseIf intNumber = 0 Then
SHEETNAME = ActiveWorkbook.ActiveSheet.Name
Else
SHEETNAME = ActiveWorkbook.Sheets(intNumber).Name
End If
End Function