Съдържание
В тази статия ще ви покажа как можете да получите текущата дата в VBA в Excel. Ще се научите да показвате текущата дата, да показвате текущия час, както и да форматирате датата и часа в желания от вас формат.
Как да получите текущата дата във VBA (бърз преглед)
Изтегляне на работна тетрадка за практика
Изтеглете тази книга за упражнения, за да упражните задачата, докато четете тази статия.
Получаване на текущи дати във VBA.xlsm3 начина за получаване на текущата дата във VBA
Нека разгледаме най-добрите начини за получаване на текущата дата и час в Macro в VBA .
1. Получаване на текущата дата чрез функцията Date във VBA
Първо, нека да видим как можем да получим текущата дата. Можете да получите текущата дата в VBA доста изчерпателно с помощта на Функция за дата на VBA .
Редът от кода ще бъде:
Current_Date=Date() Пълният код за показване на текущата дата ще бъде:
⧭ Код VBA:
Sub Get_Current_Date() Current_Date = Date MsgBox Current_Date End Sub Забележка: Този код създава Macro наречен Get_Current_Date .
⧭ Изход:
Изпълнете тази макропрограма и ще получите Кутия за съобщения показване на текущата дата, 11-януари-22 .
Прочетете повече: Как да вмъкнете текущата дата в Excel
2. Вмъкване на текущата дата и час чрез функцията Now на VBA
Можете да използвате Сега функция на VBA за получаване на текущата дата и текущото време.
Редът от кода ще бъде:
Current_Date_and_Time = Now() Следователно пълният код за показване на текущата дата и час:
⧭ Код VBA:
Sub Get_Current_Date_and_Time() Current_Date_and_Time = Now() MsgBox Current_Date_and_Time End Sub Забележка: Този код създава Macro наречен Get_Current_Date_and_Time .
⧭ Изход:
Изпълнете това Macro и ще получите Кутия за съобщения показване на текущата дата и час, 11-Jan-22 11:23:20 AM .
Прочетете повече: Функции Now и Format в Excel VBA
Подобни четива
- Променлива за дата в кодове на VBA (7 приложения на макроси с примери)
- Как да използвате прекия път за дата в Excel
- Изчисляване на датата на падежа с формула в Excel (7 начина)
- Как да използваме формулата IF с дати (6 лесни примера)
3. Форматиране на текущата дата и час чрез функцията Format на VBA
Досега се научихме да получаваме текущата дата и час. Този път нека видим как можем да покажем датата и часа в желания от нас формат.
3.1 Форматиране на текущата дата
Първо ще форматираме само текущата дата.
Ще използваме Формат функция на VBA за тази цел. синтаксис на функцията е:
=Format(Date,Format) Следователно, за да се покаже текущата дата във формат дд/мм/гггг , редът от кода ще бъде:
Current_Date = Format(Date, "dd/mm/yyyy")
И пълният Код VBA ще бъде:
⧭ Код VBA:
Sub Format_Date_and_Time() Current_Date = Format(Date, "dd/mm/yyyy") MsgBox Current_Date End Sub Забележка: Този код създава Macro наречен Format_Date_and_Time .
⧭ Изход:
Ако стартирате този код, той ще покаже текущата дата в желания от вас формат, дд/мм/гггг , 11/01/2022 .
3.2 Форматиране на текущата дата и час
Можете също така да използвате Формат за форматиране на текущата дата и текущото време заедно.
Нека покажем текущата дата и час във формат dd/mm/yyyy hh:mm:ss am/pm .
Редът от кода ще бъде:
Current_Date_and_Time = Format(Now(), "dd/mm/yyyy hh:mm:ss am/pm") И пълният Код VBA ще бъде:
⧭ Код VBA:
Sub Format_Date_and_Time() Current_Date_and_Time = Format(Now(), "dd/mm/yyyy hh:mm:ss am/pm") MsgBox Current_Date_and_Time End Sub Забележка: Този код създава Macro наречен Format_Date_and_Time .
⧭ Изход:
Ако стартирате този код, той ще покаже текущата дата и час в желания от вас формат, dd/mm/yyyy hh:mm:ss am/pm , 11/01/2022 12:03:45 ч. .
Прочетете повече: Как да форматирате дата с VBA в Excel
Резюме
- Сайтът СЕГА функция на Приложение на Visual Basic връща текущата дата и час.
- Сайтът Дата връща текущата дата.
- Сайтът Формат показва дата и час във всеки желан формат.
Заключение
С помощта на тези методи можете да получите и покажете текущата дата и час в Macro в Excel. Имате ли някакви въпроси? Не се колебайте да ни попитате.
