Как все мы знаем, праздник Пасхи – это всегда первое воскресенье, которое после первого церковного полнолуния, которое наступает 21 марта или позже, поэтому дата Пасхи каждого года может быть другая дата, как показано на следующем снимке экрана. Чтобы узнать дату Пасхи в конкретном году, эта статья может оказать вам услугу.
Вычислить дату Пасхи в данном году по формуле
Вычислить дату Пасхи данного года с помощью функции, определяемой пользователем
Вычислить дату Пасхи данного года по формуле
Чтобы получить Пасху дату данного года, следующая формула может помочь вам, пожалуйста, сделайте следующее:
1 . Введите эту формулу: = FLOOR (“5/” & DAY (MINUTE (A2/38)/2 + 56) & “/” & A2,7) -34 в пустую ячейку рядом с заданным вами год, B2 , например, см. снимок экрана:
2 . Затем перетащите дескриптор заполнения вниз к ячейкам, в которых вы хотите вычислить дату Пасхи данной даты, и в ячейках отобразятся пятизначные числа, см. Снимок экрана:
3 . Затем вы должны отформатировать числа как формат даты:
(1.) Выберите 5-значные числа и щелкните правой кнопкой мыши, чтобы выбрать Формат ячеек в контекстном меню. ;
(2.) В появившемся диалоговом окне Формат ячеек щелкните вкладку Число и выберите Date на панели Категория , затем выберите один формат даты, который вам нравится, из правого списка, см. снимок экрана:
4 . А затем числа были отформатированы в нужном вам формате даты, и вы можете получить дату Пасхи в данном году, см. Снимок экрана:
|
Советы : Чтобы отформатировать числа в обычном используемом формате даты, вы также можете использовать утилиту «Применить форматирование даты» в Kutools for Excel, как показано на следующем снимке экрана: |
Вычислить дату Пасхи в данном году с помощью функции, определяемой пользователем
Следующие Функция, определяемая пользователем , также может помочь вам рассчитать дату Пасхи в конкретный год.
1 . Удерживая нажатыми клавиши ALT + F11 , откроется окно Microsoft Visual Basic для приложений .
2 . Нажмите Вставить > Module и вставьте следующий код в окно Module .
Код VBA: вычисление даты Пасхи в заданном году:
3 . Затем сохраните и закройте этот код, вернитесь на рабочий лист и введите эту формулу: = easterdate (A2) в пустую ячейку рядом с соответствующими данными, а затем перетащите дескриптор заполнения вниз к ячейкам. что вы хотите применить эту формулу, вы получите несколько пятизначных чисел, см. снимок экрана:
5 . И затем вы должны изменить формат чисел на дату, как вам нужно. Просмотрите шаг 3 вышеуказанного метода, чтобы отформатировать их до даты .
Источник: