photosdematures.com

Екцел ВБА ДатеСериал функција

ДатеСериал функција у ВБА враћа датум из вредности које су доставили корисници. Морамо да доставимо шта је година, шта дан, а шта месец. Резултат ће се заснивати на формату датума вашег система.

Испод је синтакса ДАТЕСЕРИЈАЛНА функција.

#1 година: морамо унети целобројни број као која је година? Док достављамо целобројни број, морамо имати на уму следеће ствари.

• Можемо доставити бројеве од 0 до 9999.
• Једноцифрени и двоцифрени бројеви од 0 до 99 биће третирани од 1930. до 2029. године.
• Негативни целобројни број одузеће се од 2000. године. На пример, ако наведете -1, резултат ће бити 1999. због 2000 - 1 = 1999.

#2 месеца: треба да унесемо целобројни број као месец? Приликом уношења овог броја морамо имати на уму следеће ствари.

• Можемо испоручити само бројеве од 1 до 12.
• Ако је наведена целобројна вредност 0, то ће представљати месец „децембар“ претходне године.
• Ако је наведена целобројна вредност -1, то ће представљати месец „новембар“ претходне године. Овако када се негативна вредност повећа, она ће и даље представљати месец уназад године.
• Ако је достављени број већи од 12, тј. Ако је број 13, то ће представљати месец „јануар“ следеће године, ако је број 14, то ће се третирати као месец „фебруар“ следеће године.

# 3 - Дан: морамо унети целобројни број као који је дан? Приликом уноса овог броја морамо имати на уму следеће ствари.

• Можемо унети целобројне бројеве од 1 до 31 за текуће месеце.
• Ако је број 0, представљаће последњи дан претходног месеца.
• Ако је број -1, представљаће други последњи дан претходног месеца.
• Ако наведете последњи дан овог месеца +1, то ће представљати први дан следећег месеца. На пример, ако је последњи дан августа 31. и ако дан наведете као 31 + 1, то ће представљати први дан септембра.

Како се користи ДАТЕСЕРИАЛ функција у ВБА?

Овај ВБА ДатеСериал Екцел образац можете преузети овде - ВБА ДатеСериал Екцел предложак

Пример # 1

Да бисте користили функцију ДАТЕСЕРИАЛ, почните писати макро код.

Корак 1: Покрените потпроцедуру

Прво креирајте ВБА потпроцедуру као што је приказано доле.

Корак 2: Прогласите променљиву

Сада прогласите променљиву као ДАТЕ.

Корак 3: Доделите функцију ДатеСериал тој променљивој.

Сада за ову променљиву доделите функцију ДАТЕСЕРИАЛ.

Корак 4: Сада унесите вредности године, месеца и дана у функцију ДатеСериал

За ГОДИНУ снабдевања 2019, за МЕСЕЦ снабдевање 08, а за ДАН 05.

Корак 5: Прикажи резултат у оквиру за поруке

Сада у пољу за поруке прикажите резултат променљиве „Мој датум“.

Шифра:

 Опција Експлицитно Суб ДатеСериал_Екампле1 () Дим Мидате Ас Дате Мидате = ДатеСериал (2019, 8, 5) МсгБок Мидате Енд Суб 

Корак 6: Покрените код

Сада покрените овај код да бисте видели датум испод.

Резултат каже „5.8.2019“. У мом формату системског датума је облик „ММ-ДД-ГГГГ“, па је зато и резултат у истом формату.

Такође можемо променити формат датума користећи функцију ФОРМАТ у ВБА. Примените функцију ФОРМАТ као доле.

Шифра:

 Опција Експлицитно Суб ДатеСериал_Екампле1 () Дим Мидате Ас Дате Мидате = ДатеСериал (2019, 8, 5) МсгБок Формат (Мидате, "ДД-МММ-ИИИИ") Крај Суб 

Ово ће применити формат у „ДД-МММ-ГГГГ“ и резултат је следећи.

Пример # 2

Такође можемо декларирати променљиве и достављати вредности тим променљивим. За пример погледајте доњи код.

Шифра:

 Суб ДатеСериал_Екампле2 () Затамни датум датума Као затамни МиИеар као целобројно затамни МиМонтх као целобројно забележи МиДаи као целобројно МиИеар = 2019 МиМонтх = 8 МиДаи = 5 Мидате = ДатеСериал (МиИеар, МиМонтх, МиДаи) МсгБок Формат (МиДате, "ДД-ММИ, ММ-ИИ ") Крај Суб 

Уместо да годину, месец и дан доставимо директно функцији ДАТЕСЕРИАЛ, прогласили смо променљиве и доделили им вредности. Затим смо касније испоручили променљиве у функцију ДАТЕСЕРИАЛ.

На овај начин можемо да користимо променљиве у ВБА за складиштење вредности.

Пример # 3

Сада ћемо експериментисати са годином. Доделићу вредност године као 1 и видећу резултат.

Једно- и двоцифрени бројеви у ГОДИНИ представљају годину од 1930. до 2029. Дакле, 01 значи 2001, 02 значи 2002 и тако даље.

Хајде сада да променимо број месеца на 0 и да видимо резултат.

Погледајте код овде, Година је 2019, а месец 0. Али погледајте резултат који каже 05. 12. 2019., док је испоручена 2019. година каже 2018. тј. Претходна година.

То је зато што, пошто смо месец унели као 0 ДАТЕСЕРИАЛ функција узима месец до последњег месеца претходне године и такође мења годину у складу с тим.

Као овај, испробајте различите бројеве да бисте видели утицај функције.

Ствари које треба запамтити

• Морате знати који број представља коју годину, месец и вртић. Пажљиво прочитајте објашњење синтаксе да бисте разумели.
• Резултат ће се заснивати на формату датума вашег система, ако желите модификовани резултат, онда морате да примените функцију ФОРМАТ и наведите формат датума према својој удобности.