Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Добавить к дате N РАБОЧИХ дней / 9 сообщений из 9, страница 1 из 1
23.02.2010, 13:05
    #36484211
Роман Шевченко
Роман Шевченко
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить к дате N РАБОЧИХ дней
Дурацкая задча, мозги не варят. Хелп.

Есть стартовая дата. StartData, Есть известное заранее количество рабочих (!!!) дней (то есть исключая субота, воскресенье), которое нужно прибавить к стартовой дате.

Как вычислить стоповую дату???

Капец. Понимаю, что элементарно, но уперся как баран.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.02.2010, 13:46
    #36484276
.Михаил.
.Михаил.
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить к дате N РАБОЧИХ дней
Роман Шевченко,
Не забудь, кроме субботы и воскресенья, исключать в расчете праздничные дни, переносы праздников (если выпадает на выходные) и выходных дней.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.02.2010, 14:06
    #36484306
Роман Шевченко
Роман Шевченко
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить к дате N РАБОЧИХ дней
.Михаил.,

Это потом, из таблицы праздников. Сейчас задача решить детскую проблему в принципе.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.02.2010, 15:22
    #36484406
Hugo121
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить к дате N РАБОЧИХ дней
В Экселе есть функция, может её использовать, если иначе не получается?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.02.2010, 15:34
    #36484426
mds_world
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить к дате N РАБОЧИХ дней
Роман Шевченко,

если праздники не учитываются (т.е. только без суббот и воскресений), то попробуйте такую функцию
Код: plaintext
1.
2.
Function rabday(dt, n)
    rabday = dt + n + ((n + WeekDay(dt, vbMonday)) \  5 ) *  2  -  1 
End Function
dt - дата с которой начинается отсчет, n - количество рабдней
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.02.2010, 16:49
    #36484544
ё
ё
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить к дате N РАБОЧИХ дней
Роман Шевченко...

Это потом, из таблицы праздников. Сейчас задача решить детскую проблему в принципе.

вот, может на потом пригодится
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.02.2010, 10:49
    #36485276
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить к дате N РАБОЧИХ дней
DateAdd + F1

Jah loves you.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.02.2010, 11:24
    #36485381
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить к дате N РАБОЧИХ дней
AntonariyDateAdd + F1

Не все так просто на самом деле. Есть такие моменты типа суббота +1 рабочий день - это понедельник. Воскресенье+1 - тоже.

В VB тем не было, а вот в ветке про SQL было неоднократно, например. . Адаптировать решения для VB труда не составляет, DATEADD там тоже есть :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.02.2010, 12:25
    #36485558
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавить к дате N РАБОЧИХ дней
Насчет рабочих заметил не сразу.

Jah loves you.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Добавить к дате N РАБОЧИХ дней / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]