HERBERS Excel-Forum - die Beispiele

Thema: Nachbildung der Funktion NETTOARBEITSTAGE aus dem Analyse-Pack

Home

Gruppe

UDF

Problem

Die Funktion NETTOARBEITSTAGE aus dem Analyse-Pack soll als benutzerdefinierte Funktion (UDF) erstellt werden.

Lösung
Über die nachfolgende benutzerdefinierte Funktion. Eingabesyntax: =atage(A1;B1;FreieTage!A1:A4)
StandardModule: Modul1

Function ATage(datStart As Date, datEnd As Date, rng As Range)
   Dim var As Variant
   Dim lDay As Long, lCount As Long
   For lDay = datStart To datEnd
      If WorksheetFunction.Weekday(lDay, 2) < 6 Then
         var = Application.Match(lDay, rng, 0)
         If IsError(var) Then
            lCount = lCount + 1
         End If
      End If
   Next lDay
   ATage = lCount
End Function

Beiträge aus dem Excel-Forum zu den Themen UDF und Nettoarbeitstage

Lohnsteuerberechnung (UDF, XLM-Datei, Webabfrage) Nettoarbeitstage vom 1. des Monats bis HEUTE!
Ergebnis UDF ändert, wenn Tabelle deaktiviert wird UDF soll nicht auf Daten anderer Dateien zugreifen
vor Ausführung einer UDF Zwischenspeicher "retten& UDF - Argument ohne " " übergeben möglic
Datum plus Nettoarbeitstage Nettoarbeitstage im Februar
Funktion "Nettoarbeitstage" Nettoarbeitstage
UDF- Beschreibung Nettoarbeitstage
Berechnungsdauer einer UDF messen NettoArbeitstage im Mai falsch berechnet
Nettoarbeitstage; ZÄHLENWENN mit VERKETTEN Hintergrudfarbe ändern??? Finde keine Lösung :-(
Nettoarbeitstage Probleme mit IsNumeric, Code per UDF
UDF mittels Ereignis aktualisieren? UDF, Minuszeichen vor Zahl auswerten
Nettoarbeitstage Funktion nach Worksheet_Change werden UDF nicht ausgewertet
Excel anhalten bei UDF UDF
Nettoarbeitstage - Anfangsdatum ausrechnen UDF, Rückgabewert Text anstelle Zahl
Aufruf einer UDF, Fehler Objekt erforderlich SQL in UDF
Formel zur Berechnung der Nettoarbeitstage Nettoarbeitstage
NETTOARBEITSTAGE Nettoarbeitstage ohne vorgefertige Formel
Nettoarbeitstage Funktion Nettoarbeitstage
Application.Worksheetfunction.Nettoarbeitstage Nettoarbeitstage
Werte einer UDF werden nicht aktualisiert Formel "Nettoarbeitstage" funzt nicht
Nettoarbeitstage als SQL statement Problem mit Nettoarbeitstage
Nettoarbeitstage in VBA Nettoarbeitstage aktivieren
Formel Nettoarbeitstage -0 bei Nettoarbeitstagen
Aufruf von UDF mit Array zählenwenn nettoarbeitstage bereich
Add In: "Nettoarbeitstage" UDF: Semikolon vs Komma
UDF, erkennen in welcher Zelle die UDF steht Nettoarbeitstage