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

ВБА функција Датедифф пружа разлику између два наведена интервала. Овде се интервал може одредити као сати / месеци / дана… итд. Како је одредио корисник. То је уграђена функција у Екцелу и категорисана је као функција " Датум / време ". Може се користити као " ВБА " функција у Екцелу.

Синтакса :

Параметар или аргументи који се користе у функцији ДатеДифф.

1. Интервал:

  • Је обавезно.
  • Типе: - Стринг типе израз.
  • Израчунава разлику између два датума.
Подешавање (интервал) Опис / објашњење
"С" Секунде
„Н“ Минута
"Х" Сати
„Д“ Дани
"В" Радним даном
„М“ Месецима
"Вв" Недеља
„И“ Дан у години
"К" Четвртина
„Ииии“ Година

2. Датум1:

  • Је обавезно.
  • Тип: - Датум.
  • Представља датум / време почетка рачунања датумифа.

3. Датум2:

  • Је обавезно.
  • Тип: - Датум.
  • Представља крајњи датум / време за израчун датумифа.

4. Први дан у недељи:

  • Није опционалан.
  • Тип: - нумерички или текст.
  • Одређује дан који се користи као први дан у седмици.
  • Ако се овај аргумент или параметар пропусти, претпоставља се да је недеља (ВбСундаи) први дан у седмици.

5. Прва недеља у години

  • Није опционалан.
  • Тип: - нумерички или текст.
  • Одређује дан који се користи као прва недеља у години.
  • Ако се овај аргумент или параметар пропусти, претпоставља се да ће 1. јануара (вбФирстЈан1) бити прва седмица у години.

Како омогућити Екцел картицу у Екцелу?

Картица за програмере обавезна је на Екцел траци да бисте покренули и написали ВБА макро. Испод су сљедећи кораци за омогућавање картице програмерима у екцелу ВБА:

Корак 1: Идите на картицу менија Датотека .

Корак 2: У менију Датотека кликните на Опције које се налазе на последњој листи доступних опција на менију.

Корак 3: Кликните на Прилагоди врпцу да бисте приступили опцијама прилагођавања врпце.

4. корак: Овде у опцијама за прилагођавање можете видети опцију за програмере . Означите га тако да се активира на главној врпци програма екцел и лако му се може приступити. Притисните ОК након провере опције за програмере.

Чим притиснете ОК, у менију Екцел врпце можете видети картицу Девелопер активну са гомилом различитих опција доступних испод. Погледајте снимак екрана испод.

Како се користи функција ДатеДифф у Екцелу ВБА?

Испод су сљедећи кораци за кориштење функције ДатеДифф у Екцелу ВБА:

Можете преузети овај предложак ВБА ДатеДифф Екцел овде - ВБА Предложак ДатеДифф Екцел

Пример # 1

У овом примеру, следите следеће кораке да бисте користили ДатеДифф функцију у ВБА:

1. корак: Прво направите име макроа.

Шифра:

 Суб бб () Крај Суб

Корак 2: Две променљиве су дефинисане као датум и њима се додељује датум.

Шифра:

 Суб бб () Дим дт1 Као датум Дим дт2 Као датум дт1 = # 1/1/2010 9:00:00 # дт2 = # 4/19/2019 11:00:00 # Крај Суб

Корак 3: Напишите синтаксу функције Датедифф узимајући потребан аргумент и доделите је кроз оквир ВБА поруке.

Шифра:

 Суб бб () Дим дт1 Као датум Дим дт2 Као датум дт1 = # 1/1/2010 9:00:00 # дт2 = # 4/19/2019 11:00:00 # МсгБок ДатеДифф ("х", дт1, дт2) Крај Суб

Корак 4: Покрените код притиском на тастер Ф5 или кликом на дугме Плаи. Тако да ће се резултат приказати у пољу за поруке.

Пример бр. 2

У доњем примјеру, функција датеифф израчунава број година између два датума „09/06/2016“ и „16/12/2020“. Овде се не узимају у обзир опционални параметри.

Шифра:

 Суб АА () 'Разлика у години МсгБок ДатеДифф ("ииии", "09/06/2016", "16/12/2020") Крај Суб

Да бисте покренули програм притисните картицу „ Ф8 “ или „ Покрени “. Резултат ће бити приказан у пољу за поруке.

Пример бр. 3

У доњем примјеру, функција датеифф израчунава број мјесеци између два датума „09/06/2016“ и „16/12/2020“. Овде се не узимају у обзир опционални параметри.

Шифра:

 Под АА1 () 'месечна разлика МсгБок ДатеДифф ("м", "09/06/2016", "16/12/2020") Крај Суб

Да бисте покренули програм притисните картицу „ Ф8 “ или „ Покрени “. Резултат ће бити приказан у пољу за поруке.

Пример бр. 4

У доњем примјеру, функција датеифф израчунава број седмица између два датума "09/06/2016" и "16/12/2020". Овде се не узимају у обзир опционални параметри.

Шифра:

 Суб АА2 () 'недељне разлике МсгБок ДатеДифф ("вв", "09/06/2016", "16/12/2020") Крај Суб

Да бисте покренули програм притисните картицу „ Ф8 “ или „ Покрени “. Резултат ће бити приказан у пољу за поруке.

Пример бр. 5

У доњем примјеру, функција „ датеифф “ израчунава број четвртина између два датума „09/06/2016“ и „16/12/2020“. Овде се не узимају у обзир опционални параметри.

Шифра:

 Суб АА3 () 'квартална разлика МсгБок ДатеДифф ("к", "09/06/2016", "16/12/2020") Крај Суб

Да бисте покренули програм притисните картицу „ Ф8 “ или „ Покрени “. Резултат ће бити приказан у пољу за поруке.

Пример бр. 6

У доњем примјеру, функција „ датеифф “ израчунава број дана између два датума „09/06/2016“ и „16/12/2020“. Овде се не узимају у обзир опционални параметри.

Шифра:

 Суб АА4 () 'дневна разлика МсгБок ДатеДифф ("д", "09/06/2016", "16/12/2020") Крај Суб

Да бисте покренули програм притисните картицу „ Ф8 “ или „ Покрени “. Резултат ће бити приказан у пољу за поруке.

Пример бр. 7

У доњем примјеру, функција „ датеифф “ израчунава број сати између два датума и времена „9:00 на дан 01.01.2010. “ И „11:00 дана 19.04.04.“.

Шифра:

 Под бб1 () 'Израчунајте број сати између 1.01.2010 9:00 и 19.4.2014 11:00 Дим дт1 као датум Дим дт2 Као датум дт1 = # 1/1/2010 9:00:00 # дт2 = # 4/19/2019 11:00:00 # МсгБок ДатеДифф ("х", дт1, дт2) Крај Суб

Да бисте покренули програм притисните картицу „ Ф8 “ или „ Покрени “. Резултат ће бити приказан у пољу за поруке.

Пример бр. 8

У доњем примјеру, функција „ датеифф “ израчунава број секунди између два датума и времена „9:00 дана 01.01.2010. “ И „11:00 дана 19.04.04.“.

Шифра:

 Подбб2 () 'Израчунајте број секунди између 1.01.2010 9:00 и 19.4.2014 11:00 Дим дт1 као датум Дим дт2 Као датум дт1 = # 1/1/2010 9:00:00 # дт2 = # 4/19/2019 11:00:00 # МсгБок ДатеДифф ("с", дт1, дт2) Крај Суб

Да бисте покренули програм притисните картицу „ Ф8 “ или „ Покрени “. Резултат ће бити приказан у пољу за поруке.

Пример бр. 9

У доњем примјеру, функција „ датеифф “ израчунава број минута између два датума и времена „9:00 дана 01.01.2010. “ И „11:00 дана 19.04.04.“.

Шифра:

 Под бб3 () 'Израчунајте број минута између 1. 01. 9. 9:00 и 19.4.2014. 11:00. Дим дт1 Као Датум Дим дт2 Као Датум дт1 = # 1/1/2010 9:00:00 # дт2 = # 4/19/2019 11:00:00 # МсгБок ДатеДифф („н“, дт1, дт2) Крај Суб

Да бисте покренули програм притисните картицу „ Ф8 “ или „ Покрени “. Резултат ће бити приказан у пољу за поруке.

Пример бр. 10

Ако је аргумент наведен као „в“ (недеље), функција „Датедифф“ враћа број целе недеље између два датума. Делимичне недеље се игноришу. У примјеру, функција „ ДатеДифф “ израчунава број цијелих седмица између датума 01.01.2010. И 19.4.2014.

Шифра:

 Под бб4 () 'Израчунајте број недеља између 1. 1. 2010. и 19. 4. 2010. Дим дт1 као Датум Дим дт2 Као Датум дт1 = # 1/1/2010 # дт2 = # 4/19/2010 # МсгБок ДатеДифф ("в", дт1, дт2) Крај Суб

Да бисте покренули програм притисните картицу „ Ф8 “ или „ Покрени “. Резултат ће бити приказан у пољу за поруке.

Пример бр. 11

Ако је аргумент наведен као „вв“ (календарске недеље), функција „Датедифф“ пружа број недеља између почетка недеље који садржи датум1 и почетка недеље који садржи датум2.

Шифра:

 Под бб5 () 'Израчунајте број календарских недеља између 1. 1. 2010. и 19.4.2014.' Први дан у недељи = Понедељак Дим дт1 Као Датум Дим дт2 Као Датум дт1 = # 1/1/2010 # дт2 = # 4/19/2019 # МсгБок ДатеДифф ("вв", дт1, дт2, вбМондаи) Крај Суб

Да бисте покренули програм притисните картицу „ Ф8 “ или „ Покрени “. Резултат ће бити приказан у пољу за поруке.

Пример 12

У доњем примјеру, функција „датиифф“ користи се за датуме „1/1/1990“ и „1/1/1998“

Шифра:

 Субцц () Дим дт1 Као датум Дим дт2 Као датум дт1 = # 1/1/1990 9:00:00 # дт2 = # 1/11/1998 11:00:00 # МсгБок ("ред 1:" & ДатеДифф ("х", дт1, дт2)) МсгБок ("ред 2:" & ДатеДифф ("с", дт1, дт2)) МсгБок ("ред 3:" & ДатеДифф ("н", дт1, дт2)) МсгБок ("ред 4:" & ДатеДифф ("д", дт1, дт2)) МсгБок ("ред 5:" & ДатеДифф ("м", дт1, дт2)) МсгБок ("ред 6:" & ДатеДифф ("к", дт1, дт2)) МсгБок ("ред 7:" & ДатеДифф ("в", дт1, дт2)) МсгБок ("ред 8:" & ДатеДифф ("вв", дт1, дт2)) МсгБок ("ред 9: "& ДатеДифф (" и ", дт1, дт2)) МсгБок (" ред 10: "& ДатеДифф (" ииии ", дт1, дт2)) Крај Суб

Да бисте покренули програм притисните картицу „ Ф8 “ или „ Покрени “. Резултат ће бити приказан у пољу за поруке.

Затим кликните на „ ОК “ да бисте добили следећи резултат.

Закључак

Функција " ДатеДифф " тако помаже у одређивању колико одређених временских интервала постоји између два наведена датума и времена.

Препоручени чланци

Ово је водич за ВБА ДатеДифф. Овде смо расправљали о томе како користити функцију ДатеДифф у Екцел ВБА заједно са практичним примерима и довнлоад-ом Екцел предлошка. Можете и да прођете кроз друге наше предложене чланке -

  1. ВБА Децларе Арраи (Примери)
  2. Комплетан водич за ВБА о грешци
  3. Метода листа заштите у ВБА
  4. ВБА Колоне | Предложак Екцела
  5. ВБА Енвиронмент

Категорија:

ВБА