Thema Datum  Von Nutzer Rating
Antwort
Rot networkdays ENDdate
18.05.2012 21:41:45 Gast81334
Solved
22.05.2012 13:00:16 Dekor
NotSolved
22.05.2012 19:08:20 nobody
NotSolved

Ansicht des Beitrags:
Von:
Gast81334
Datum:
18.05.2012 21:41:45
Views:
1643
Rating: Antwort:
 Nein
Thema:
networkdays ENDdate

Hallo,

Habe einen kleinen Code geschrieben und verstehe nicht warum er nicht geht.

ich versuche mit einer Prozedur den Tag zu erfassen der 2 Networktage in der Zukunft liegt.

Z.B. heute ist Freitag also will ich den Dienstag herausfinden

Sub test()


Dim heute As Date, gesucht As Date
heute = Format(Date, "m/d/yyyy")      'Ist meine Formatierung die ich verwende
gesucht = Format(Date, "m/d/yyyy")  'Ist meine Formatierung die ich verwende

MsgBox gesucht  'nur zum check welches Datum ausgegeben wird

Do While 2 > Application.WorksheetFunction.NetworkDays(heute, gesucht)
gesucht = gesucht + 1
Loop

MsgBox gesucht  ' Nun muesste hier praktisch das Datum vom Dienstag stehen, tut es aber nicht WARUM??? es steht immer noch das heutige datum drinne.

 

Vielen Dank fuer Antworten

End Sub


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot networkdays ENDdate
18.05.2012 21:41:45 Gast81334
Solved
22.05.2012 13:00:16 Dekor
NotSolved
22.05.2012 19:08:20 nobody
NotSolved