Як розрахувати дату Великодня в Excel?
Як ми всі знаємо, свято Великодня - це завжди перша неділя, яка після першого церковного повного місяця, що настає 21 березня або після нього, тому дата Великодня кожного року може бути іншою датою, як показано на наступному знімку екрана. Щоб отримати конкретну дату Великодня даного року, ця стаття може зробити вам послугу.
Обчисліть дату Великодня даного року за формулою
Обчисліть дату Великодня даного року за допомогою функції, визначеної користувачем
Обчисліть дату Великодня даного року за формулою
Щоб отримати дату Великодня даного року, вам може допомогти наступна формула, будь ласка, зробіть наступне:
1. Введіть цю формулу: =FLOOR("5/"&DAY(MINUTE(A2/38)/2+56)&"/"&A2,7)-34 в порожню клітинку поруч із даним роком, B2, наприклад, див. скріншот:
2. Потім перетягніть маркер заповнення до клітинок, для яких потрібно обчислити дату Великодня даної дати, і в комірках відображаються п’ятизначні числа, див. Знімок екрана:
3. І тоді вам слід відформатувати цифри як формат дати:
(1.) Виберіть 5-значні числа та клацніть правою кнопкою миші, щоб вибрати Формат ячеек з контекстного меню;
(2.) У вискочив Формат ячеек діалогове вікно натисніть кнопку Номер Вкладка і виберіть Дата від Категорія панелі, а потім виберіть потрібний формат дати у правому списку, див. знімок екрана:
4. А потім, цифри були відформатовані як формат дати, як вам потрібно, і ви можете отримати дату Великодня даного року, див. Скріншот:
|
Tips : Щоб відформатувати числа відповідно до звичайного використовуваного формату дати, ви також можете скористатися утилітою Apply Date Formatting Kutools for Excel, як показано на наступному знімку екрана:
|
Обчисліть дату Великодня даного року за допомогою функції, визначеної користувачем
Наступні Визначена користувачем функція також може допомогти вам розрахувати дату Великодня конкретного року.
1. Утримуйте клавішу ALT + F11 клавіші, потім відкриється Microsoft Visual Basic для додатків вікна.
2. Клацання Insert > Модуліта вставте наступний код у Модулі Вікно
Код VBA: Обчисліть дату Великодня даного року:
Public Function EasterDate(Yr As Integer) As Date
'Updateby Extendoffice 20160530
Dim x As Integer
x = (((255 - 11 * (Yr Mod 19)) - 21) Mod 30) + 21
EasterDate = DateSerial(Yr, 3, 1) + x + (x > 48) + 6 - ((Yr + Yr \ 4 + _
x + (x > 48) + 1) Mod 7)
End Function3. Потім збережіть і закрийте цей код, поверніться до робочого аркуша та введіть цю формулу: = Великдень (A2) у порожню комірку поруч із відповідними даними, а потім перетягніть маркер заповнення вниз до комірок, до яких ви хочете застосувати цю формулу, ви отримаєте п’ятизначні цифри, див. знімок екрана:
5. І тоді вам слід змінити цифри на формат дати, як вам потрібно. Будь ласка, перегляньте крок 3 вищевказаного методу, щоб відформатувати їх на сьогоднішній день.
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
