Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.10.2025 10:29:26
Userform Multipage - Page auswählen
19.10.2025 21:57:06
Diagrammpunkte in unterschiedlichen Farben je nach Wert
19.10.2025 18:21:56
Prüfen, ob Bild geladen wurde
19.10.2025 15:24:14
VBA -Drucken nur, wenn ich mit bestimmtem WLAN verbunden bin
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
288to292
288to292
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Function/ Nutzung im Excelsheet

Forumthread: Function/ Nutzung im Excelsheet

Function/ Nutzung im Excelsheet
06.08.2003 18:48:32
Mike E.
Hallo zusammen,
ich habe folgende Funktion, die sich in Excel auch prima nutzen lässt, wenn ich einen Bereich dafür nutze (so hab ich es ja auch deklariert...). Wie kann ich vorgehen, wenn ich in die Klammer hinter den Funktionsnamen einen Wert eingeben möchte?
Für jede Hilfe bin ich dankbar.
Hier die Funktion TagName:

Function TagName(Datum As Range) As Variant
Dim c As Object
For Each c In Datum
TagName = Format(c, "dddd")
Next c
End Function

Viele grüße
Mike
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Halbe Lösung: Function/ Nutzung im Excelsheet
06.08.2003 18:59:14
Mike E.
Hallo zusammen,
eine halbe Lösung habe ich nun bereits:

Function TagName1(Datum As Date) As Variant
TagName1 = Format(datum1, "dddd")
End Function

Allerdings:
wie kann ich es anstellen, dass sowohl Bereichsauswahl, als auch Werteingabe in den Klammern funktioniert? denn so geht es nicht:

Function TagName1(Datum As Date, datum2 As Range) As Variant
Dim c As Object
For Each c In datum2
TagName1 = Format(c, "dddd")
Next c
TagName1 = Format(Datum, "dddd")
End Function

Vielen Dank und viele Grüße
Mike

Anzeige
Fehler im Code des letzten Postings
06.08.2003 19:03:52
Mike E.
Hallo,
vorheriges Postin beinhaltete einen Fehler. Hier nochmal neu:
Hallo zusammen,
eine halbe Lösung habe ich nun bereits:

Function TagName(Datum As Range) As Variant
Dim c As Object
For Each c In Datum
TagName = Format(c, "dddd")
Next c
End Function

Allerdings:
wie kann ich es anstellen, dass sowohl Bereichsauswahl, als auch Werteingabe in den Klammern funktioniert? denn so geht es nicht:

Function TagName1(Datum As Date, datum2 As Range) As Variant
Dim c As Object
For Each c In datum2
TagName1 = Format(c, "dddd")
Next c
TagName1 = Format(Datum, "dddd")
End Function

Vielen Dank und viele Grüße
Mike

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