Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
340to344
340to344
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Problem bei selbstentwickelter Funktion

Forumthread: Problem bei selbstentwickelter Funktion

Problem bei selbstentwickelter Funktion
21.11.2003 10:16:05
John
Hallo zusammen,

ich habe eine Funktion geschrieben, die es dem Benutzer erlaubt, durch Eingabe des Formelsyntax z.B. "=VONBIS(A3;"ab";"cd";1)" den Wert einer Zelle "auseinanderzupflücken".
Funktioniert so weit auch ganz gut, die Funktion lautet:

Function VONBIS(bezug, sepvon, sepbis, block)

Meine Frage: Kann man die Funktion so konfigurieren, daß der letzte Zeil der Funktion (die Variable "block") optional ist?
Damit möchte ich erreichen, daß - wenn ich den Syntax "=VONBIS(A3;"ab";"cd")" eingebe (also ohne das ";1" am Ende) - die Formel nicht "#WERT!" ausgibt.
Meines Erachtens muß man die "block"-Variable dafür irgendwie deklarieren, z. B.

Function VONBIS(bezug, sepvon, sepbis, block as optional)

oder so... aber ich komm' einfach nicht dahinter!
Vielen Dank im Voraus!
Gruß,

John
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Problem bei selbstentwickelter Funktion
21.11.2003 10:30:49
Nayus
Hi,
folgendes Demo demonstriert die Verwendung optionaler Parameter:

Public 

Function mycalc(a As Long, b As Long, Optional c As Long)
Application.Volatile
If IsMissing(c) Then
mycalc = a + b
Else
mycalc = a + b + c
End If
End Function


Gruß,
Nayus
Anzeige
AW: Problem bei selbstentwickelter Funktion
21.11.2003 10:49:57
John
Funktioniert super, vielen Dank!
Gruß,

John
AW: Problem bei selbstentwickelter Funktion
21.11.2003 10:32:54
Nike
Hi,
mal so versuchen?

Function VONBIS(bezug As Range, sepvon As Integer, sepbis As Integer, Optional block As Integer)

Bye

Nike
AW: Problem bei selbstentwickelter Funktion
21.11.2003 10:50:41
John
Funktioniert super, vielen Dank!
Gruß,

John
Anzeige
AW: Optional Block As .... = ...
21.11.2003 10:34:25
Galenzo
Hallo,
bei Optionalen Argumenten gibst du einen Wert für DEN Fall vor, wenn dieser Parameter bei Aufruf der Funktion nicht angegeben wird.

function vonbis (bezug as range, sepvon as integer, sepbis as integer, optional block as integer=0)

Viel Erfolg!
AW: Optional Block As .... = ...
21.11.2003 10:52:47
John
Funktioniert super, vielen Dank! Hatte bloß den Fehler gemacht, daß ich in meiner ursprünglichen Version das "optional" HINTER die Variable geschrieben habe. Jetzt klappt's... :)
Gruß,

John
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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