Znajdowanie numeru tygodnia za pomocą VBA w programie Microsoft Excel

Anonim

W tym przykładzie utworzymy niestandardową funkcję, aby znaleźć numer tygodnia dla określonej daty.

W tym przykładzie przykładowe dane składają się z danych dotyczących obecności pracownika, które obejmują datę, identyfikator pracownika i status obecności.

Chcemy znaleźć numer tygodnia dla określonej daty.

W tym przykładzie użyliśmy zarówno wbudowanych funkcji „WEEKNUM”, jak i niestandardowej funkcji „Display_WeekNum”, aby obliczyć numer tygodnia dla podanej daty.

Excel ma wbudowaną funkcję „WEEKNUM”, aby znaleźć numer tygodnia.

Składnia funkcji WEEKNUM

=NUMERTYG(data;pierwszydzieńtygodni)

Parametr Date określa datę, dla której chcemy znaleźć numer tygodnia, a FirstDayOfWeek określa dzień, który należy uznać za pierwszy dzień tygodnia.

Zbudowaliśmy również niestandardową funkcję „Display_WeekNum”, aby znaleźć numer tygodnia dla podanej daty.

Wyjaśnienie logiczne

W funkcji niestandardowej „Display_WeekNum” użyliśmy funkcji WorksheetFunction, aby uzyskać dostęp do wbudowanej funkcji WEEKNUM programu Excel. Ta funkcja przyjmuje datę jako parametr wejściowy i zwraca numer tygodnia. Domyślnie ta funkcja traktuje poniedziałek jako pierwszy dzień tygodnia.

Proszę postępować zgodnie z poniższym kodem!

 Opcja Funkcja jawna Display_WeekNum(DefinedDate As Date) Display_WeekNum = WorksheetFunction.WeekNum(DefinedDate, vbMonday) Funkcja zakończenia 

Jeśli podobał Ci się ten blog, podziel się nim ze znajomymi na Facebooku. Możesz również śledzić nas na Twitterze i Facebooku.

Chcielibyśmy usłyszeć od Ciebie, daj nam znać, jak możemy poprawić naszą pracę i uczynić ją lepszą dla Ciebie. Napisz do nas na stronie e-mail