VBA днес - Как да използвам функцията за дата във VBA, за да намерим днешната дата?

Съдържание

Функция VBA днес

Функция VBA днес

Днес означава текущата дата, в работен лист Функцията Now прави същото, което ни дава текущата дата и час, но в самата VBA няма вградена функция днес, методът за получаване на текущата дата на системата е чрез функцията за дата и за разлика от функцията за дата дата функция ни дава само текущата дата.

В Excel имаме няколко полезни функции, които могат да ни помогнат ежедневно. Excel улесни целия ни живот на работното място. Когато казвам „всеки ден“, Excel има формулата да връща и днешната дата, а не само датата, ние също можем да вземем текущата дата и час заедно. Такова е разнообразието от формули на Excel. Ако сте редовен потребител на Excel, надявам се да сте попаднали на формулата, наречена „ДНЕС“ в Excel, за да вмъкнете текущата дата, както се показва във вашия работещ компютър. Но ние нямаме функция ДНЕС във VBA, тогава как да получим датата ДНЕС от VBA. Тази статия ще ви покаже как да работите с ДНЕС в VBA. Прочетете.

Каква е формулата за получаване на днешната дата във VBA?

Ако няма формула, наречена ДНЕС, тогава как да получим днешната дата от VBA? Това е често срещаният въпрос, който всеки задава, но решението е просто, имаме формула с различно име, т.е. функция DATE.

Каква функция на датата има във VBA?

DATE е точно същото като функцията VBA TODAY, но това не е променлива функция, освен ако не стартирате макроса или не задействате макроса.

Синтаксисът на функцията DATE няма аргументи. Просто трябва да предадем функцията DATE. Това е всичко.

ДАТА ()

Примери за функцията за дата във VBA

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

Пример # 1

Нека създадем проста функция DATE, която да показва текущата дата в полето за съобщения. Следвайте стъпките по-долу, за да напишете макроса на Excel.

Стъпка 1: Създайте подпроцедура, като наименувате макроса.

Стъпка 2: Декларирайте променливата като „Дата“. Функцията DATE връща резултата само като дата, така че променливият тип данни трябва да бъде „Дата“.

Код:

Sub Today_Example1 () Dim K As String End Sub

Стъпка 3: Присвоете стойността на променлива „k“ като функция DATE .

Код:

Sub Today_Example1 () Dim K As String K = Дата Край Sub

Стъпка 4: Сега стойността на променливата „k“ в полето за съобщения във VBA .

Код:

Sub Today_Example1 () Dim K As String K = Date MagBox K End Sub

Изпълнете кода. Трябва да видим текущата дата, показваща се в системата.

Забележка: Форматът на датата може да варира в зависимост от системните настройки. Може да е в „mm-dd-yy“, „dd-mm-yy.“

Функция за дата за намиране на дължимото е днес.

Функцията за дата е по-полезна в контекста на намирането на крайните дати на EMI, плащане с кредитна карта, застрахователни плащания и т.н. …

Да приемем, че работите като длъжностно лице за събиране на заеми и имате списък с клиенти с дължимата им сума и датата на падежа.

В колоната на състоянието ви е необходим резултатът „Дължимо е днес“, ако датата на падежа е равна на текущата системна дата.

Това може да се направи с помощта на условието IF и цикли в VBA. По-долу е готовият код, за да стигнете до резултатите.

Код:

Sub Today_Example2 () Dim K As Integer For K = 2 To 11 If Cells (K, 3) .Value = Date then Cells (K, 4) .Value = "Срокът е в Днес" Други клетки (K, 4) .Value = "Не днес" Край, ако следващ K Край Под

Това ще доведе до резултатите в колоната на състоянието.