Датум ВБА формата

Овај водич ће показати како обликовати датуме помоћу ВБА.

Форматирајте датуме у ВБА

Постоје два начина форматирања датума помоћу ВБА.

  1. Својство НумберФормат ћелија / опсега - За обликовање датума ускладиштених у ћелијама
  2. Функција ВБА Формат - За обликовање датума у ​​ВБА (нпр. Променљиве)

Формат броја - Датуми

Подразумевани формат броја ћелије у Екцелу је Опште. Можете приказати вредности као бројеве, текст, датуме, проценте или валуте променом формата броја. Својство НумберФормат се може користити у ВБА за постављање формата броја датума у ​​ћелији или опсегу.

Белешка: Да бисте видели различите стандардне формате датума доступне у Екцелу, идите на Почетна> Број и видећете опције као што су Кратак датум, Дуги датум и Време.


Кратак спој

Опција обликовања кратког датума приказује датум у кратком, нумеричком формату.

Следећи код ће поставити својство .НумберФормат ћелије А1 на Схорт дате:

1 Опсег ("А1"). НумберФормат = "мм/дд/гггг"

Лонг Дате

Форматирање бројева са дугим датумом приказује датум у дужем, писаном формату. Следећи код ће поставити својство .НумберФормат ћелије А1 на Лонг дате:

1 Опсег ("А1"). НумберФормат = "дддд, мммм дд, гггг"

Прилагођени датуми

Да бисте видели прилагођене кодове формата бројева које можете да користите у ВБА за обликовање датума, идите на Почетна> Број и кликните на Покретач дијалога. Одаберите картицу Број и одаберите Прилагођено.

Можете изабрати прилагођене уграђене формате за свој датум или креирати сопствене кориснички дефинисане формате датума. Следећи код ће подесити својство .НумберФормат ћелије А1 на уграђени прилагођени формат датума:

1 Опсег ("А1"). НумберФормат = "ммм-ии"

Резултат је:

Следећи код ће поставити својство .НумберФормат ћелије А1 у прилагођени формат датума који дефинише корисник:

1 Опсег ("А1"). НумберФормат = "дддд-дд-ммм-ии"

Резултат је:

Прегледом Екцел-ових унапред изграђених примера можете научити како треба унети НумберФормате. За више информација прочитајте Мицрософтову документацију о форматима бројева за датуме.

Функција ВБА формата

Као што је горе поменуто, метода НумберФормат је погодна за постављање нумеричког формата датума смештених у Екцел ћелијама. У ВБА можете користити функцију обликовања за претварање датума у ​​низове са одређеним форматирањем датума.

За обликовање датума користили бисте следећу синтаксу:

Формат (Стринг_Репресентатион, НумберФорматЦоде) где:

Стринг_Репресентатион - текстуални низ који представља датум.

НумберФорматЦоде - код формата броја који одређује начин приказа датума.

Следећи код показује како да форматирате текстуални низ који приказује датум као дугачак формат датума:

1 МсгБок формат ("1/1/2010", "дддд, мммм дд, гггг")

Резултат је:

Имајте на уму да функција обликовања користи исту синтаксу обликовања датума као горњи формат броја.

Следећи код приказује како да форматирате текстуални низ који приказује датум као средњи формат датума:

1 МсгБок формат ("09. октобар 2012", "Средњи датум")

Резултат је:

Следећи код показује како се форматира текстуални приказ датума као формат који дефинише корисник:

1 МсгБок формат ("09. октобар 2012", "дддд: дд/мм/ггг")

ВБА Градитељ прилагођених формата

Наш додатак ВБА: АутоМацро садржи програм за прављење прилагођених формата за ВБА Едитор. Ово вам омогућава да поставите прилагођене формате и одмах прегледате излаз за жељену вредност:

Додатак ВБА садржи бројне друге „Генераторе кода“, опсежну библиотеку кодова и низ других алата за кодирање. То је врхунски додатак за свакога ко се озбиљно бави ВБА програмирањем!

Датум ВБА формата у Аццессу

Функција ВБА Формат Дате ради потпуно исто у Аццесс ВБА као и у Екцел ВБА.

12345678910 Функција ГетДатеФилтер () Као Стринг'направите низ за добијање информација из 2 поља датума на обрасцу у програму АццессДим стрДатеФиелд Ас СтрингАко је ИсНулл (Ме.тктСДате) = Нетачно ОндаАко је ИсНулл (Ме.тктЕДате) = Тачно, тада је Ме.тктЕДате = Ме.тктСДатеАко стрДатеФиелд2 = "" ОндаГетДатеФилтер = стрДатеФиелд & "Између #" & Формат (Ме.тктСДате, "мм/дд/ииии") & " # Анд #" & Формат (Ме.тктЕДате, "мм/дд/ииии") & " #"Крај АкоКрај АкоЗавршна функција

Ви ће помоћи развој сајта, дељење страницу са пријатељима

wave wave wave wave wave