добавить рабочие дни в поле даты в Access 2010 - PullRequest
Новая
       8

добавить рабочие дни в поле даты в Access 2010

0 голосов
/ 08 октября 2019

У меня есть поле «Упорядоченная дата», которое отображается в отчете, и я хочу, чтобы эта дата отображалась красным цветом, если ей более 3 рабочих дней. Я видел несколько разных кодов, но они длинны, и я не уверен, как применить их к моему отчету или даже к запросу. Я считаю, что в моей базе данных первое воскресенье недели - воскресенье. Хотелось бы понять это, поскольку у меня есть другие доклады, которые я бы тоже хотел применить. У меня нет формального обучения в доступе. Ваша помощь очень ценится.

1 Ответ

0 голосов
/ 09 октября 2019

Для этого нет короткого или тупого кода, даже если праздники следует учитывать.

Один из примеров - моя функция здесь: DateDiffWorkdays .

Однако все, что вам нужно, это скопировать и вставить полный код в новый модуль, скомпилировать и сохранить.

Затем, чтобы проверить, используйте выражение, подобное этому, в событии Format раздела Подробности отчета: 

Private Sub Detailsection_Format(Cancel As Integer, FormatCount As Integer)

    Me!YourTextbox.ForeColor = IIf(DateDiffWorkdays([OrderDate],Date()) > 3, vbRed, vbBlack)

End Sub
...