Excel. Пользовательская функция - подсчет стажа

**Пытливый** · 30.12.2009, 21:02

Доброго времени суток, уважаемые!
Представляю Вам на обсуждение сбацанную "на коленке" пользовательскую функцию для подсчета временного интервала между двумя датами (проще говоря - по-нашему, по-бразильски, - стажа).
Данные выводятся в виде строки "Стаж составляет ... г. ... мес. ... дн."
Синтаксис функции в прилагаемом файле на единственном листе (думаю, разберетесь).
Код функции - в том же файле - в единственном модуле проекта.
Что хотелось бы услышать - комментарии по коду (оптимальность, ну и как можно было сделать лучше) от "зубров VBA".
Ну и благодарность восхищенных слушателей тоже приветствуется!

Пользуясь случаем поздравляю всех с наступающим праздником!!!!
С НОВЫМ ГОДОМ! УРА-УРА-УРА-А-А-А-А-А!!!!

**zAngel** · 31.12.2009, 10:40

Это новогодний подарочек?
К сожалению нет екселя (в опене не открывается корректно) под рукой, уже только в следующем году увижу во всей красе.
Но меня лично интересуют следующие факты, т.к. функцию с подобным результатом мы не так давно обсуждали.
1. Захватывает ли результат +1 день? То есть
01.01.09 по 30.09.09 и мне выдает не 9 месяцев, а 8 месяцев 29 дней.
2. Есть ли возможность составлять по вашей формуле общий стаж? То есть плюсовать, например, стаж состоящий из двух-трех и более периодов?
ЗЫ: сорь, повторюсь задаю вопросы вслепую.
С НАСТУПАЮЩИМ!!!!

**Зета** · 31.12.2009, 13:51

Спасибо. Удобно для случаев, когда приходится указывать стаж в 1С:ЗиК.
Присоединяюсь к предыдущему оратору

неплохо было бы

плюсовать, например, стаж состоящий из двух-трех и более периодов

И еще. Добавить вариант вывода результата не в годах-месяцах- днях, а только в месяцах-днях. Так требуется в 1С:ЗиК

**vikttur** · 31.12.2009, 20:46

Пытливый, выложил Ваш файл на Планете_Excel:
Главный форум-Форумы-Вопросы по Microsoft Excel-Подсчет стажа

Никоим образом не умаляю знаний посетителей данного форума, но, согласитесь, - знатоков Excel'я на специализированном форуме больше и, естественно, критических замечаний и помощи по корректировке кода можно получить больше.
Заходите, тема-то Ваша

**Anden** · 03.01.2010, 21:51

СПАСИБО автору за новогодний подарочек!

Очень полезная программка... Побольше бы таких опытных пользователей-программеров на нашем сайте! Будут еще интересные идейки программ - выкладывайте! Будем очень благодарны!

**Ревизорша** · 02.02.2010, 22:05

Ребятки.. а у меня в оупене работа.. помогите, плиз... а так чёт в экселе не получилось... я по другому формулу забила)) вот так: =РАЗНДАТ(A1;A2;"y") & " г. " & РАЗНДАТ(A1;A2;"ym") & " мес. " & РАЗНДАТ(A1;A2;"md") & " дн."

**vikttur** · 03.02.2010, 11:34

=ГОД(A2-A3)-1900& " г. " & МЕСЯЦ(A2-A3)& " мес. " &ДЕНЬ(A2-A3)& " дн."

**Octopus** · 03.02.2010, 20:12

Есть аналогичное творение, но без VBA, чистыми формулами Excel. Кому надо - обращайтесь.

**zAngel** · 09.02.2010, 10:19

Ну наконец дошли руки и память.

Предлагаю посчитать стаж работника принятого на работу 1 января и уволенного 31 декабря.
По канонам подсчета стажа, он отработал ровно один год. По всевозможным функциям екселя в т.ч. и =РАЗНДАТ всегда украден один день. Выход из этой ситуации простейший есть, например добавлением скрытой колонки с =B1+1.
2. и насколько я увидела плюсовать эти стажи также возможности нет.

Не так давно мы обсуждали это на клерке, немного в другом разделе.

То есть ничем не отличается от от разндата

**Octopus** · 09.02.2010, 10:43

Стаж с 1 января по 28 февраля составляет 2 месяца, а у вас 1 месяц 27 дней.

Предлагаю свою "разработку", никакого VBA, чистые формулы

**zAngel** · 09.02.2010, 11:29

Octopus, спасибо, очень и гланое руки не доходили никак

**Octopus** · 09.02.2010, 12:12

Осталась проблема суммирования нескольких периодов стажа. В случае, если периоды идут один за другим, проблем нет; хуже, когда разрывы... У меня пока никаких идей относительно того, как это реализовать малой кровью.

**vikttur** · 09.02.2010, 15:43

Киньте пример

**vikttur** · 09.02.2010, 16:01

Сообщение от Octopus

Стаж с 1 января по 28 февраля составляет 2 месяца, а у вас 1 месяц 27 дней.

Предлагаю свою "разработку", никакого VBA, чистые формулы

Движком блокируются ссылки на дружественные сайты!

Обсуждения по теме:
Сайт Планета Excel, темы по стажу на форуме:
=12427
=6144

**Lenik** · 11.02.2010, 09:15

Octopus, пасипа! Тоже себе сохранила. А периоды приноровилась в уме складывать

**Natasel** · 12.02.2010, 16:45

Сообщение от Пытливый

Доброго времени суток, уважаемые!
Представляю Вам на обсуждение сбацанную "на коленке" пользовательскую функцию для подсчета временного интервала между двумя датами (проще говоря - по-нашему, по-бразильски, - стажа).
Данные выводятся в виде строки "Стаж составляет ... г. ... мес. ... дн."
Синтаксис функции в прилагаемом файле на единственном листе (думаю, разберетесь).
Код функции - в том же файле - в единственном модуле проекта.
Что хотелось бы услышать - комментарии по коду (оптимальность, ну и как можно было сделать лучше) от "зубров VBA".
Ну и благодарность восхищенных слушателей тоже приветствуется!

Пользуясь случаем поздравляю всех с наступающим праздником!!!!
С НОВЫМ ГОДОМ! УРА-УРА-УРА-А-А-А-А-А!!!!

По вашей функции:
01.12.2008 12.02.2010 стаж составляет: 2 г.-10 мес. 11 дн.
А это неправильно.

**lubezniy** · 13.02.2010, 09:37

А вот это не проверите?

http://www.lubezniy.ru/stag2.html

**yante** · 13.02.2010, 11:38

Сообщение от lubezniy

А вот это не проверите?

http://www.lubezniy.ru/stag2.html

С 01/02/2009 по 28/02/2009 выдает 29 дней...

**Octopus** · 14.02.2010, 21:53

Сообщение от lubezniy

А вот это не проверите?

http://www.lubezniy.ru/stag2.html

05.01.2009 04.02.2009 0 лет 1 мес 1 дн
А должен быть ровно месяц

**YUM** · 05.03.2010, 12:30

Сообщение от Octopus

05.01.2009 04.02.2009 0 лет 1 мес 1 дн
А должен быть ровно месяц

при расчет стажа принят месяц равный 30 дням.
31-5=26 + 4=30 МЕСЯЦ !

**Bucom** · 07.03.2010, 23:33

Сообщение от YUM

31-5=26

Как это, как это? 5-е число "за человека" не считаете? "Пустышек" вроде только четыре: с 1-ого по 4-ое.

**YUM** · 09.03.2010, 14:34

Сообщение от Bucom

Как это, как это? 5-е число "за человека" не считаете? "Пустышек" вроде только четыре: с 1-ого по 4-ое.

я что-то не понял.
Январь =31 день. В задаче 5 января первый день расчета. 31-5=26 дней стажа в январе, плюс 4 дня в феврале. Итого =30 дней, т.е. 1 месяц.

**Bucom** · 09.03.2010, 17:59

Сообщение от YUM

я что-то не понял

И я тоже. Если 5 января входит в стаж, то январского стажа 27 дней?

**YUM** · 11.03.2010, 10:38

Сообщение от Bucom

И я тоже. Если 5 января входит в стаж, то январского стажа 27 дней?

точно

там же алгоритм содержит +1

**Аноним** · 11.09.2010, 08:56

Сообщение от vikttur

=ГОД(A2-A3)-1900& " г. " & МЕСЯЦ(A2-A3)& " мес. " &ДЕНЬ(A2-A3)& " дн."

Данная формула вычисляет не првильно. Пример дата приема на работу 01.01.2010 дата увольнения 31.12.2010 года. Результат должен быть ровно 1 год. А по формуле получается 0 г. 12 мес. 29 дн.

**Старый ворчун** · 16.09.2010, 09:48

где постановка задачи? т.е. описание на русском языке, что должна выдавать функция при таких-то входных параметрах.

без этого смысла нет что-то кодировать на любом языке.

**richard_az** · 16.09.2010, 13:39

Бухгалтера прикалываются с экзельем

Если так пойдет, то кто-нибудь сделает экзель альтернативу 1с в виде ерп

**Старый ворчун** · 16.09.2010, 16:09

Сообщение от richard_az

Бухгалтера прикалываются с экзельем

Если так пойдет, то кто-нибудь сделает экзель альтернативу 1с в виде ерп

на чистом екзеле вряд ли.
а связка Access+Excel как раз для всяких бухучетов - ваяй, что хочешь.

**YUM** · 17.09.2010, 13:14

Сообщение от Аноним

Данная формула вычисляет не првильно. Пример дата приема на работу 01.01.2010 дата увольнения 31.12.2010 года. Результат должен быть ровно 1 год. А по формуле получается 0 г. 12 мес. 29 дн.

11 месяцев
в формулу надо добавить +1 день (смотрите ниже по постам. Или на любую линейку, где отсчет идет с нуля, а не с единицы)
тогда будет 11 мес 30 дней, что равно 12 мес.И равно 1 году

**Klerk-agent** · 17.11.2010, 18:07

Сообщение от Octopus

Стаж с 1 января по 28 февраля составляет 2 месяца, а у вас 1 месяц 27 дней.

Предлагаю свою "разработку", никакого VBA, чистые формулы

Блин, вещуга прикольная, но 1 день битый получается.

вот такой вот промежуток времени:

05.07.10 - 21.09.10 - по табличке выходит 2 мес. 17 дн.
а должно быть 2 мес. 16 дн.

Тема: Excel. Пользовательская функция - подсчет стажа

Опции темы

Поиск по теме