Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: [VBA] Eigene Funktion auch ohne Argument zulassen

[VBA] Eigene Funktion auch ohne Argument zulassen
29.03.2017 20:15:30
Nils
Hallo,
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

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: [VBA] Eigene Funktion auch ohne Argument zulassen
29.03.2017 20:34:36
Crazy
Hallo
was für ein Argument willste denn wech lassen?
vielleicht so?
Public Function BLATTNAME(Optional Nummer As Integer) As String
MfG Tom
AW: [VBA] Eigene Funktion auch ohne Argument zulassen
29.03.2017 20:42:49
Nils
Perfekt, danke! :-)
Optional.... das hatte ich gesucht! :-)
AW: [VBA] Eigene Funktion auch ohne Argument zulassen
29.03.2017 20:48:27
Gerd
Hallo Nils,
falls "-" erhalten bleiben soll.
Public Function BLATTNAME(Optional Nummer As Variant) As String
' Neuberechnungen aktivieren mit Application.Volatile
Application.Volatile
If IsMissing(Nummer) Then
BLATTNAME = ActiveSheet.Name
Else
On Error Resume Next
BLATTNAME = ActiveWorkbook.Sheets(Nummer).Name
On Error GoTo 0
End If
If Len(BLATTNAME) = 0 Then BLATTNAME = "-"
End Function

Gruß Gerd
Anzeige
AW: [VBA] Eigene Funktion auch ohne Argument zulassen
29.03.2017 21:10:16
Nils
Auch nicht schlecht, danke! :-)
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige