Намиране на номера на седмицата с помощта на VBA в Microsoft Excel

Anonim

В този пример ще създадем персонализирана функция за намиране на номера на седмицата за посочената дата.

За този пример примерните данни се състоят от данни за посещаемостта на служителя, които включват дата, идентификационен номер на служител и статус на посещаемост.

Искаме да намерим номера на седмицата за определена дата.

В този пример използвахме както вградени функции „WEEKNUM“, така и персонализирана функция „Display_WeekNum“, за да изчислим номера на седмицата за дадената дата.

Excel има вградена функция „WEEKNUM“, за да намери номера на седмицата.

Синтаксис на функцията WEEKNUM

= WEEKNUM (Дата, FirstDayOfWeek)

Параметърът Date указва датата, за която човек иска да намери номера на седмицата, а FirstDayOfWeek посочва деня, който трябва да се счита за първи ден от седмицата.

Също така имаме изградена персонализирана функция “Display_WeekNum”, за да намерим номера на седмицата за дадената дата.

Логично обяснение

В персонализираната функция “Display_WeekNum” използвахме WorksheetFunction за достъп до вградената WEEKNUM функция на Excel. Тази функция приема датата като входен параметър и връща номера на седмицата. По подразбиране тази функция счита понеделник за първи ден от седмицата.

Моля, следвайте кода по -долу

 Опция Изрична функция Display_WeekNum (DefinedDate As Date) Display_WeekNum = WorksheetFunction.WeekNum (DefinedDate, vbMonday) Крайна функция 

Ако този блог ви е харесал, споделете го с приятелите си във Facebook. Също така можете да ни следвате в Twitter и Facebook.

Ще се радваме да чуем от вас, уведомете ни как можем да подобрим работата си и да я направим по -добра за вас. Пишете ни на имейл сайта