Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Ближайшая вторая или четвертая суббота - Страница 2 - Мир MS Excel

Старая форма входа
  • Страница 2 из 3
  • «
  • 1
  • 2
  • 3
  • »
Модератор форума: китин  
Мир MS Excel » Работа и общение » Мозговой штурм » Ближайшая вторая или четвертая суббота (Формулы/Formulas)
Ближайшая вторая или четвертая суббота
AlexM Дата: Вторник, 07.11.2023, 22:03 | Сообщение № 21
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4397
Репутация: 1087 ±
Замечаний: 0% ±

Excel 2003
С помощью Елены формула получилась. :)
Код
=-ПРОСМОТР(-A2;-ДАТА(ГОД(A2);МЕСЯЦ(A2)+{1;1;0;0};{4;2;4;2}*7-6)-ОСТАТ(6-ДАТА(ГОД(A2);МЕСЯЦ(A2)+{1;1;0;0};);7))

Проверил даты с 1.01.2023 по 7.03.2024
Спасибо всем за помощь.
К сообщению приложен файл: vtoraja_i_chetvertaja_subbota2.xls (294.5 Kb)



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.
 
Ответить
СообщениеС помощью Елены формула получилась. :)
Код
=-ПРОСМОТР(-A2;-ДАТА(ГОД(A2);МЕСЯЦ(A2)+{1;1;0;0};{4;2;4;2}*7-6)-ОСТАТ(6-ДАТА(ГОД(A2);МЕСЯЦ(A2)+{1;1;0;0};);7))

Проверил даты с 1.01.2023 по 7.03.2024
Спасибо всем за помощь.

Автор - AlexM
Дата добавления - 07.11.2023 в 22:03
Gustav Дата: Среда, 08.11.2023, 01:10 | Сообщение № 22
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2656
Репутация: 1116 ±
Замечаний: 0% ±

начинал с Excel 4.0, видел 2.1
ДАТА(ГОД(A2);МЕСЯЦ(A2)+{1;1;0;0}
А и правда! hands Что-то я свою формулу недогнул в этом направлении, полёз в какие-то дебри с текстовыми массивами, а оно вон как всё можно было элегантно свернуть:
Код
=-ВПР(-A1;-ДАТА(ГОД(A1);МЕСЯЦ(A1)+{1:0:0};ОСТАТ(13-ДЕНЬНЕД(ДАТА(ГОД(A1);МЕСЯЦ(A1)+{1:0:0};1);2);7)+{8:22:8});1;1)

Единственное, чего пока не понял - как вы обошлись совсем без функции ДЕНЬНЕД, но будет время - поразбираюсь. Всё-таки новые версии Excel со своими новыми супер-функциями для работы с массивами прежний эксельный разум и навыки изрядно убаюкивают, а, может быть, наоборот - берегут для достижения новых горизонтов.


МОИ: Ник, Tip box: 41001663842605
 
Ответить
Сообщение
ДАТА(ГОД(A2);МЕСЯЦ(A2)+{1;1;0;0}
А и правда! hands Что-то я свою формулу недогнул в этом направлении, полёз в какие-то дебри с текстовыми массивами, а оно вон как всё можно было элегантно свернуть:
Код
=-ВПР(-A1;-ДАТА(ГОД(A1);МЕСЯЦ(A1)+{1:0:0};ОСТАТ(13-ДЕНЬНЕД(ДАТА(ГОД(A1);МЕСЯЦ(A1)+{1:0:0};1);2);7)+{8:22:8});1;1)

Единственное, чего пока не понял - как вы обошлись совсем без функции ДЕНЬНЕД, но будет время - поразбираюсь. Всё-таки новые версии Excel со своими новыми супер-функциями для работы с массивами прежний эксельный разум и навыки изрядно убаюкивают, а, может быть, наоборот - берегут для достижения новых горизонтов.

Автор - Gustav
Дата добавления - 08.11.2023 в 01:10
msi2102 Дата: Среда, 08.11.2023, 09:38 | Сообщение № 23
Группа: Проверенные
Ранг: Обитатель
Сообщений: 409
Репутация: 129 ±
Замечаний: 0% ±

Excel 2007
Вот ещё UDF
[vba]
Код
Public Function Saturday_2_4(d1 As Date)
    Dim n As Byte, m As Byte, d2 As Date
    For m = 0 To 1
        n = 7 - Weekday(DateSerial(Year(d1), Month(d1) + m, 1), vbSaturday)
        For i = 1 To 3 Step 2
            d2 = DateAdd("ww", i, DateAdd("d", n, DateSerial(Year(d1), Month(d1) + m, 1)))
            If d1 <= d2 Then Saturday_2_4 = d2: Exit Function
        Next
    Next
End Function
[/vba]
К сообщению приложен файл: subbota.xlsm (17.0 Kb)


Сообщение отредактировал msi2102 - Среда, 08.11.2023, 09:41
 
Ответить
СообщениеВот ещё UDF
[vba]
Код
Public Function Saturday_2_4(d1 As Date)
    Dim n As Byte, m As Byte, d2 As Date
    For m = 0 To 1
        n = 7 - Weekday(DateSerial(Year(d1), Month(d1) + m, 1), vbSaturday)
        For i = 1 To 3 Step 2
            d2 = DateAdd("ww", i, DateAdd("d", n, DateSerial(Year(d1), Month(d1) + m, 1)))
            If d1 <= d2 Then Saturday_2_4 = d2: Exit Function
        Next
    Next
End Function
[/vba]

Автор - msi2102
Дата добавления - 08.11.2023 в 09:38
AlexM Дата: Среда, 08.11.2023, 11:49 | Сообщение № 24
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4397
Репутация: 1087 ±
Замечаний: 0% ±

Excel 2003
msi2102, n = 7 - Weekday.....
С 7 не верный результат, после замены на 8 работает с ошибками.
К сообщению приложен файл: subbota2.xlsm (65.6 Kb)



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.
 
Ответить
Сообщениеmsi2102, n = 7 - Weekday.....
С 7 не верный результат, после замены на 8 работает с ошибками.

Автор - AlexM
Дата добавления - 08.11.2023 в 11:49
msi2102 Дата: Среда, 08.11.2023, 12:23 | Сообщение № 25
Группа: Проверенные
Ранг: Обитатель
Сообщений: 409
Репутация: 129 ±
Замечаний: 0% ±

Excel 2007
С 7 не верный результат, после замены на 8 работает с ошибками.
Мой косяк, исправил:
[vba]
Код
Public Function Saturday_2_4(d1 As Date)
    Dim n As Byte, m As Byte, d2 As Date
    For m = 0 To 1
        n = 7 - Weekday(DateSerial(Year(d1), Month(d1) + m, 1))
        For i = 1 To 3 Step 2
            d2 = DateAdd("ww", i, DateAdd("d", n, DateSerial(Year(d1), Month(d1) + m, 1)))
            If d1 <= d2 Then Saturday_2_4 = d2: Exit Function
        Next
    Next
End Function
[/vba]
К сообщению приложен файл: 9757612.xlsm (65.3 Kb)
 
Ответить
Сообщение
С 7 не верный результат, после замены на 8 работает с ошибками.
Мой косяк, исправил:
[vba]
Код
Public Function Saturday_2_4(d1 As Date)
    Dim n As Byte, m As Byte, d2 As Date
    For m = 0 To 1
        n = 7 - Weekday(DateSerial(Year(d1), Month(d1) + m, 1))
        For i = 1 To 3 Step 2
            d2 = DateAdd("ww", i, DateAdd("d", n, DateSerial(Year(d1), Month(d1) + m, 1)))
            If d1 <= d2 Then Saturday_2_4 = d2: Exit Function
        Next
    Next
End Function
[/vba]

Автор - msi2102
Дата добавления - 08.11.2023 в 12:23
AlexM Дата: Среда, 08.11.2023, 13:20 | Сообщение № 26
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4397
Репутация: 1087 ±
Замечаний: 0% ±

Excel 2003
msi2102, Спасибо большое. :)



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.
 
Ответить
Сообщениеmsi2102, Спасибо большое. :)

Автор - AlexM
Дата добавления - 08.11.2023 в 13:20
AlexM Дата: Воскресенье, 12.11.2023, 11:49 | Сообщение № 27
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4397
Репутация: 1087 ±
Замечаний: 0% ±

Excel 2003
Завершил поставленную задачу.
Для преобразования в код JavaScript выбрал свою формулу. Формула чуть сократилась и вышла так
Код
=-ПРОСМОТР(-A2;-ДАТА(ГОД(A2);МЕСЯЦ(A2)+{1;0;0};{2;4;2}*7-6)-ОСТАТ(6-ДАТА(ГОД(A2);МЕСЯЦ(A2)+{1;0;0};);7))

Теперь на сайте будет строка "Следующая рабочая суббота - ДАТА"
В коде JavaScript учел, что если текущая дата совпадает с найденной ближайшей (второй или четвертой в месяце) субботой, то после 14:00 (окончание рабочего времени) будет показана следующая рабочая суббота.
Код тестовой странички получился такой
[vba]
Код
<html>

<body>
<p>Следующая рабочая суббота - <b id="Saturday"></b></p>
</body>

<script>
var today = new Date()
today.setSeconds(today.getSeconds()-50399)
for ( var m = 0; m < 3; m++) {
    var today1 =  new Date(today.getFullYear(), today.getMonth() + Math.floor(m / 2), 2*((m % 2)+1)*7-6)
    var today2 =  new Date(today.getFullYear(), today.getMonth() + Math.floor(m / 2), 1)
    today2.setDate(1 - today2.getDate())
    var today2 = 7-(today2 % 7)
    today1.setDate(today1.getDate() + today2)
    if ( today1 >= today ) break
}
    document.getElementById("Saturday").innerHTML =today1.toLocaleDateString();
</script>

</html>
[/vba]
Еще раз всем большое спасибо за помощь. :)



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.


Сообщение отредактировал AlexM - Воскресенье, 12.11.2023, 11:50
 
Ответить
СообщениеЗавершил поставленную задачу.
Для преобразования в код JavaScript выбрал свою формулу. Формула чуть сократилась и вышла так
Код
=-ПРОСМОТР(-A2;-ДАТА(ГОД(A2);МЕСЯЦ(A2)+{1;0;0};{2;4;2}*7-6)-ОСТАТ(6-ДАТА(ГОД(A2);МЕСЯЦ(A2)+{1;0;0};);7))

Теперь на сайте будет строка "Следующая рабочая суббота - ДАТА"
В коде JavaScript учел, что если текущая дата совпадает с найденной ближайшей (второй или четвертой в месяце) субботой, то после 14:00 (окончание рабочего времени) будет показана следующая рабочая суббота.
Код тестовой странички получился такой
[vba]
Код
<html>

<body>
<p>Следующая рабочая суббота - <b id="Saturday"></b></p>
</body>

<script>
var today = new Date()
today.setSeconds(today.getSeconds()-50399)
for ( var m = 0; m < 3; m++) {
    var today1 =  new Date(today.getFullYear(), today.getMonth() + Math.floor(m / 2), 2*((m % 2)+1)*7-6)
    var today2 =  new Date(today.getFullYear(), today.getMonth() + Math.floor(m / 2), 1)
    today2.setDate(1 - today2.getDate())
    var today2 = 7-(today2 % 7)
    today1.setDate(today1.getDate() + today2)
    if ( today1 >= today ) break
}
    document.getElementById("Saturday").innerHTML =today1.toLocaleDateString();
</script>

</html>
[/vba]
Еще раз всем большое спасибо за помощь. :)

Автор - AlexM
Дата добавления - 12.11.2023 в 11:49
bmv98rus Дата: Воскресенье, 12.11.2023, 14:44 | Сообщение № 28
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4095
Репутация: 766 ±
Замечаний: 0% ±

Excel 2013/2016
Код
=-LOOKUP(-A2;WEEKDAY(TEXT(A2+{31;0;0};"ГГГ-М-\1");2)-TEXT(A2+{31;0;0};"ГГГ-М-\1")-{13;27;13})

AlexM, И правда, где пропадал?

[offtop]
Теперь на сайте будет строка "Следующая рабочая суббота - ДАТА"

А что за сайт который только каждую вторую субботу работает? :D [/offtop]


Замечательный Временно просто медведь , процентов на 20.

Сообщение отредактировал bmv98rus - Воскресенье, 12.11.2023, 15:32
 
Ответить
Сообщение
Код
=-LOOKUP(-A2;WEEKDAY(TEXT(A2+{31;0;0};"ГГГ-М-\1");2)-TEXT(A2+{31;0;0};"ГГГ-М-\1")-{13;27;13})

AlexM, И правда, где пропадал?

[offtop]
Теперь на сайте будет строка "Следующая рабочая суббота - ДАТА"

А что за сайт который только каждую вторую субботу работает? :D [/offtop]

Автор - bmv98rus
Дата добавления - 12.11.2023 в 14:44
AlexM Дата: Воскресенье, 12.11.2023, 15:41 | Сообщение № 29
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4397
Репутация: 1087 ±
Замечаний: 0% ±

Excel 2003
Сайт работает 24/7 с апреля 2009 года.
Так работает новое правление. Для старого правления объявление было не нужно. Работало всегда.
СНТ Чкаловское



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.
 
Ответить
СообщениеСайт работает 24/7 с апреля 2009 года.
Так работает новое правление. Для старого правления объявление было не нужно. Работало всегда.
СНТ Чкаловское

Автор - AlexM
Дата добавления - 12.11.2023 в 15:41
AlexM Дата: Воскресенье, 12.11.2023, 16:38 | Сообщение № 30
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4397
Репутация: 1087 ±
Замечаний: 0% ±

Excel 2003
bmv98rus, формула работает не корректно. Посмотри ее работу в файле из сообщения 24



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.
 
Ответить
Сообщениеbmv98rus, формула работает не корректно. Посмотри ее работу в файле из сообщения 24

Автор - AlexM
Дата добавления - 12.11.2023 в 16:38
bmv98rus Дата: Воскресенье, 12.11.2023, 16:40 | Сообщение № 31
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4095
Репутация: 766 ±
Замечаний: 0% ±

Excel 2013/2016
[offtop]Понятно, шутка не прошла.[/offtop]

А с формулой- доупрощался :-) Ща допилим.
Код
=-LOOKUP(-A2;WEEKDAY(TEXT(A2+{21;0;0};"ГГГ-М-\1"))-TEXT(A2+{21;0;0};"ГГГ-М-\1")-{14;28;14})
К сообщению приложен файл: example2894.xlsm (69.7 Kb)


Замечательный Временно просто медведь , процентов на 20.

Сообщение отредактировал bmv98rus - Воскресенье, 12.11.2023, 18:27
 
Ответить
Сообщение[offtop]Понятно, шутка не прошла.[/offtop]

А с формулой- доупрощался :-) Ща допилим.
Код
=-LOOKUP(-A2;WEEKDAY(TEXT(A2+{21;0;0};"ГГГ-М-\1"))-TEXT(A2+{21;0;0};"ГГГ-М-\1")-{14;28;14})

Автор - bmv98rus
Дата добавления - 12.11.2023 в 16:40
Светлый Дата: Понедельник, 13.11.2023, 13:31 | Сообщение № 32
Группа: Друзья
Ранг: Старожил
Сообщений: 1818
Репутация: 504 ±
Замечаний: 0% ±

Excel 2013, 2016
У меня такая формула получилась:
Код
=МИН(ТЕКСТ(ДАТА(ГОД(A2);МЕСЯЦ(A2)+{0;1};{15:29})-ДЕНЬНЕД(ДАТА(ГОД(A2);МЕСЯЦ(A2)+{0;1};1))-A2;"0;99")+A2)

*Неправильно, если последний день предыдущего месяца суббота.
**Исправил формулу.


Программировать проще, чем писать стихи.

Сообщение отредактировал Светлый - Понедельник, 13.11.2023, 15:14
 
Ответить
СообщениеУ меня такая формула получилась:
Код
=МИН(ТЕКСТ(ДАТА(ГОД(A2);МЕСЯЦ(A2)+{0;1};{15:29})-ДЕНЬНЕД(ДАТА(ГОД(A2);МЕСЯЦ(A2)+{0;1};1))-A2;"0;99")+A2)

*Неправильно, если последний день предыдущего месяца суббота.
**Исправил формулу.

Автор - Светлый
Дата добавления - 13.11.2023 в 13:31
elovkov Дата: Понедельник, 13.11.2023, 14:00 | Сообщение № 33
Группа: Друзья
Ранг: Обитатель
Сообщений: 364
Репутация: 50 ±
Замечаний: 0% ±

Excel 2013
Цитата Светлый, 13.11.2023 в 13:31, в сообщении № 32 ()
такая формула

В сентябре и декабре 2024 неправильно вычисляет :)


Умное лицо это еще не признак ума. Все глупости на земле делаются именно с этим выражением лица
 
Ответить
Сообщение
Цитата Светлый, 13.11.2023 в 13:31, в сообщении № 32 ()
такая формула

В сентябре и декабре 2024 неправильно вычисляет :)

Автор - elovkov
Дата добавления - 13.11.2023 в 14:00
Светлый Дата: Вторник, 14.11.2023, 23:45 | Сообщение № 34
Группа: Друзья
Ранг: Старожил
Сообщений: 1818
Репутация: 504 ±
Замечаний: 0% ±

Excel 2013, 2016
Чтобы не пропадало:
Код
=МИН(ТЕКСТ(МУМНОЖ(ОСТАТ(ДАТА(ГОД(A2);МЕСЯЦ(A2)+{0:0:1};7*{2:4:2});7^{6;1});{1:-1})-A2;"0;99")+A2)


Программировать проще, чем писать стихи.
 
Ответить
СообщениеЧтобы не пропадало:
Код
=МИН(ТЕКСТ(МУМНОЖ(ОСТАТ(ДАТА(ГОД(A2);МЕСЯЦ(A2)+{0:0:1};7*{2:4:2});7^{6;1});{1:-1})-A2;"0;99")+A2)

Автор - Светлый
Дата добавления - 14.11.2023 в 23:45
Gustav Дата: Среда, 15.11.2023, 03:55 | Сообщение № 35
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2656
Репутация: 1116 ±
Замечаний: 0% ±

начинал с Excel 4.0, видел 2.1
Коллеги, выяснилась интересная деталь - оказывается, ДЕНЬНЕД(0; 2) как раз является субботой! Прямо на радость нашей теме, со всеми вытекающими :)
Код
=-ПРОСМОТР(-A2;-(ОТБР(ДАТА(ГОД(A2);МЕСЯЦ(A2)+{1;0;0};)/7)+{2;4;2})*7)


МОИ: Ник, Tip box: 41001663842605
 
Ответить
СообщениеКоллеги, выяснилась интересная деталь - оказывается, ДЕНЬНЕД(0; 2) как раз является субботой! Прямо на радость нашей теме, со всеми вытекающими :)
Код
=-ПРОСМОТР(-A2;-(ОТБР(ДАТА(ГОД(A2);МЕСЯЦ(A2)+{1;0;0};)/7)+{2;4;2})*7)

Автор - Gustav
Дата добавления - 15.11.2023 в 03:55
elovkov Дата: Среда, 15.11.2023, 07:18 | Сообщение № 36
Группа: Друзья
Ранг: Обитатель
Сообщений: 364
Репутация: 50 ±
Замечаний: 0% ±

Excel 2013
Мне кажется это уже в МШ переносить можно))) Я себе файл сохранил с разными вариантыми, у каждого свой подход, пригодится поразбирать для саморазвития


Умное лицо это еще не признак ума. Все глупости на земле делаются именно с этим выражением лица
 
Ответить
СообщениеМне кажется это уже в МШ переносить можно))) Я себе файл сохранил с разными вариантыми, у каждого свой подход, пригодится поразбирать для саморазвития

Автор - elovkov
Дата добавления - 15.11.2023 в 07:18
bmv98rus Дата: Среда, 15.11.2023, 07:51 | Сообщение № 37
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4095
Репутация: 766 ±
Замечаний: 0% ±

Excel 2013/2016
Gustav, Единственное, это TRUNC - Я точно в XP его еще не помню, 2003 пропустил и просто не знаю был ли там.


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
СообщениеGustav, Единственное, это TRUNC - Я точно в XP его еще не помню, 2003 пропустил и просто не знаю был ли там.

Автор - bmv98rus
Дата добавления - 15.11.2023 в 07:51
Serge_007 Дата: Среда, 15.11.2023, 09:04 | Сообщение № 38
Группа: Админы
Ранг: Местный житель
Сообщений: 16453
Репутация: 2746 ±
Замечаний: ±

Excel 2016
это уже в МШ переносить можно
А я и перенесу :)
Отличная тема получилась!


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
это уже в МШ переносить можно
А я и перенесу :)
Отличная тема получилась!

Автор - Serge_007
Дата добавления - 15.11.2023 в 09:04
Gustav Дата: Среда, 15.11.2023, 12:03 | Сообщение № 39
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2656
Репутация: 1116 ±
Замечаний: 0% ±

начинал с Excel 4.0, видел 2.1
TRUNC - Я точно в XP его еще не помню

bmv98rus, был-был! У меня есть фирменная книжка Function Reference по Excel 3.0 (1990) - в ней TRUNC присутствует. Думаю, что лихая парочка INT и TRUNC были в Excel с самого начала.

Так что, наверное, просто не замечал. Я в большинстве подобных случаев по жизни INT обходился. И только, попав на Форум и вкусив аромат МШ, осознал, что в русской версии ОТБР короче ЦЕЛОЕ на целый символ! :)


МОИ: Ник, Tip box: 41001663842605
 
Ответить
Сообщение
TRUNC - Я точно в XP его еще не помню

bmv98rus, был-был! У меня есть фирменная книжка Function Reference по Excel 3.0 (1990) - в ней TRUNC присутствует. Думаю, что лихая парочка INT и TRUNC были в Excel с самого начала.

Так что, наверное, просто не замечал. Я в большинстве подобных случаев по жизни INT обходился. И только, попав на Форум и вкусив аромат МШ, осознал, что в русской версии ОТБР короче ЦЕЛОЕ на целый символ! :)

Автор - Gustav
Дата добавления - 15.11.2023 в 12:03
bmv98rus Дата: Среда, 15.11.2023, 12:18 | Сообщение № 40
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4095
Репутация: 766 ±
Замечаний: 0% ±

Excel 2013/2016
Я в большинстве подобных случаев по жизни INT обходился
анналогично.

Объединяя и дополняя
Код
=-LOOKUP(-A2;(TRUNC((TEXT(A2+{21;0;0};"М-Г")-1)/7)+{2;4;2})*-7)

и
Код
=-LOOKUP(-A2;CEILING(1-TEXT(A2+{21;0;0};"М-Г");7)-{2;4;2}*7)

Код
=-LOOKUP(-A2;-FLOOR(TEXT(A2+{21;0;0};"М-Г");7)-{2;4;2}*7)


Замечательный Временно просто медведь , процентов на 20.

Сообщение отредактировал bmv98rus - Четверг, 16.11.2023, 08:01
 
Ответить
Сообщение
Я в большинстве подобных случаев по жизни INT обходился
анналогично.

Объединяя и дополняя
Код
=-LOOKUP(-A2;(TRUNC((TEXT(A2+{21;0;0};"М-Г")-1)/7)+{2;4;2})*-7)

и
Код
=-LOOKUP(-A2;CEILING(1-TEXT(A2+{21;0;0};"М-Г");7)-{2;4;2}*7)

Код
=-LOOKUP(-A2;-FLOOR(TEXT(A2+{21;0;0};"М-Г");7)-{2;4;2}*7)

Автор - bmv98rus
Дата добавления - 15.11.2023 в 12:18
Мир MS Excel » Работа и общение » Мозговой штурм » Ближайшая вторая или четвертая суббота (Формулы/Formulas)
  • Страница 2 из 3
  • «
  • 1
  • 2
  • 3
  • »
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!