Zdravím,
můžete mi prosím poradit, jak zjistím v Accessu počet pracovních dní (bez víkendů a svátků) mezi dvěma daty, např. 1.1.2014 - 10.1.2014? Jinými slovy něco na způsob funkce Networkdays v Excelu. Díky za rady.
MS Access - počet pracovních dní mezi dvěma daty
Re: MS Access - počet pracovních dní mezi dvěma daty
Zdravím,
vytvořil jsem v Accessu uživatelskou funkci, která se odkazuje na funkci Networkdays z Excelu, ale funguje to jen částečně.
Při tvorbě dotazu volám funkci pomocí následujícího výrazu: Počet pracovních dní: ([StartDate];[EndDate];(#1.1.2014#)), pokud je StartDate např. 1.1.2014 a EndDate 10.1.2014, vrátí funkce 7 pracovních dní, tedy bez Nového roku a dvou víkendových dní. Když se pokusím do výrazu zadat více svátků, hlásí mi to syntaktickou chybu. Jinými slovy, funguje to jen s jedním svátkem. Můžete mi poradit, jak ve výrazu při konstrukci dotazu uvést více svátků, případně jak se odkázat na tabulku, která by tyto svátky obsahovala. Díky.
vytvořil jsem v Accessu uživatelskou funkci, která se odkazuje na funkci Networkdays z Excelu, ale funguje to jen částečně.
Kód: Vybrat vše
Public Function WorkingDays(StartDate As Date, EndDate As Date Holidays As Date) As Integer
Dim Exl As Object
Set Exl = CreateObject("Excel.Application")
WorkingDays = Exl.WorksheetFunction.NetWorkdays(StartDate, EndDate, Holidays)
Set Exl = Nothing
End Function
Při tvorbě dotazu volám funkci pomocí následujícího výrazu: Počet pracovních dní: ([StartDate];[EndDate];(#1.1.2014#)), pokud je StartDate např. 1.1.2014 a EndDate 10.1.2014, vrátí funkce 7 pracovních dní, tedy bez Nového roku a dvou víkendových dní. Když se pokusím do výrazu zadat více svátků, hlásí mi to syntaktickou chybu. Jinými slovy, funguje to jen s jedním svátkem. Můžete mi poradit, jak ve výrazu při konstrukci dotazu uvést více svátků, případně jak se odkázat na tabulku, která by tyto svátky obsahovala. Díky.
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
- 2
- 495
-
od Nejtt
Zobrazit poslední příspěvek
23 kvě 2023 19:53
-
- 3
- 312
-
od flowem
Zobrazit poslední příspěvek
včera, 11:06
-
- 7
- 1468
-
od atari
Zobrazit poslední příspěvek
28 lis 2023 11:26
-
- 0
- 816
-
od _FalcoN_
Zobrazit poslední příspěvek
22 kvě 2023 19:21
-
-
Datový model - aktualizace po přidání dalšího sloupce do Access
od MK_Vs » 27 črc 2023 12:05 » v Kancelářské balíky - 0
- 1778
-
od MK_Vs
Zobrazit poslední příspěvek
27 črc 2023 12:05
-
Kdo je online
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 4 hosti