نحوه دریافت تاریخ فعلی در VBA (3 روش)

  • این را به اشتراک بگذارید
Hugh West

در این مقاله، به شما نشان خواهم داد که چگونه می توانید تاریخ جاری را در VBA در اکسل دریافت کنید. شما یاد خواهید گرفت که تاریخ فعلی را نشان دهید، زمان فعلی را نشان دهید و همچنین تاریخ و زمان را در قالب دلخواه خود قالب بندی کنید.

نحوه دریافت تاریخ فعلی در VBA (نمایش سریع)

دانلود کتاب تمرین

این کتاب تمرینی را دانلود کنید تا در حین خواندن این مقاله، کار را تمرین کنید.

دریافت تاریخ فعلی در VBA.xlsm

3 روش برای دریافت تاریخ فعلی در VBA

بیایید بهترین راه‌ها برای دریافت تاریخ فعلی را بررسی کنیم تاریخ و زمان در ماکرو در VBA .

1. تاریخ فعلی را بر اساس تابع تاریخ VBA دریافت کنید

ابتدا، بیایید ببینیم چگونه می توانیم تاریخ فعلی را بدست آوریم. شما می توانید تاریخ فعلی را در VBA به طور کامل با استفاده از تابع تاریخ VBA دریافت کنید.

خط کد به صورت زیر خواهد بود:

Current_Date=Date()

کد کامل برای نمایش تاریخ فعلی به صورت زیر خواهد بود:

کد VBA:

3325

توجه: این کد یک ماکرو به نام Get_Current_Date ایجاد می کند.

خروجی:

این ماکرو را اجرا کنید ، و یک جعبه پیام دریافت خواهید کرد که تاریخ فعلی، 11-Jan-22 .

بیشتر بخوانید: نحوه درج تاریخ فعلی در اکسل

2. درج تاریخ و زمان فعلی با تابع Now از VBA

شما می توانید از تابع اکنون VBA برای دریافت استفاده کنیدتاریخ فعلی همراه با زمان فعلی.

خط کد به صورت زیر خواهد بود:

Current_Date_and_Time = Now()

بنابراین، کد برای نمایش تاریخ و زمان فعلی خواهد بود:

کد VBA:

3615

توجه: این کد یک ماکرو به نام Get_Current_Date_and_Time ایجاد می کند.

خروجی:

این Macro را اجرا کنید، و یک جعبه پیام دریافت خواهید کرد که تاریخ و زمان فعلی را نشان می دهد، 11-Jan-22 11:23:20 AM .

بیشتر بخوانید: اکنون و قالب بندی توابع در Excel VBA

خواندن مشابه

  • متغیر تاریخ در کدهای VBA (7 استفاده از ماکروها با مثال)
  • نحوه استفاده از میانبر تاریخ اکسل
  • تاریخ سررسید را با فرمول در اکسل محاسبه کنید (7 روش)
  • نحوه استفاده از فرمول IF با تاریخ ها (6 مثال آسان)
<9 3. قالب‌بندی تاریخ و زمان کنونی با تابع فرمت VBA

تا کنون، ما یاد گرفته‌ایم که تاریخ و زمان فعلی را دریافت کنیم. این بار، بیایید ببینیم چگونه می توانیم تاریخ و زمان را در قالب مورد نظر خود نمایش دهیم.

3.1 قالب تاریخ فعلی

ابتدا، ما فقط تاریخ فعلی را قالب بندی می کنیم .

برای این منظور از تابع Format VBA استفاده خواهیم کرد. نحو تابع این است:

=Format(Date,Format)

بنابراین، برای نمایش تاریخ فعلی در قالب dd/mm/yyyy ، خط کد این خواهد بود:

تاریخ_اکنون = فرمت(تاریخ،"dd/mm/yyyy")

و کد VBA کامل خواهد بود:

کد VBA:

6241

توجه: این کد یک ماکرو به نام Format_Date_and_Time ایجاد می کند.

خروجی:

اگر این کد را اجرا کنید، تاریخ فعلی را در قالب دلخواه شما نشان می دهد، dd/mm/yyyy ، 11/01/2022 .

3.2 قالب تاریخ و زمان فعلی

شما همچنین می توانید از تابع Format برای قالب بندی تاریخ فعلی و زمان فعلی با هم استفاده کنید.

بیایید تاریخ و زمان فعلی را در قالب dd/mm/yyyy hh:mm نمایش دهیم. :ss am/pm .

خط کد خواهد بود:

Current_Date_and_Time = Format(Now(), "dd/mm/yyyy hh:mm:ss am/pm")

و کد VBA کامل خواهد بود:

کد VBA:

5503

توجه: این کد یک ماکرو ایجاد می کند به نام Format_Date_and_Time .

خروجی:

اگر شما این کد را اجرا کنید، تاریخ و زمان فعلی را در قالب دلخواه شما نشان می دهد، dd/mm/yyyy hh:mm:ss am/pm , 11/01/2022 12:03:45 بعد از ظهر .

بیشتر بخوانید: نحوه قالب بندی تاریخ با VBA در اکسل

خلاصه

  • NOW تابع ویژوال بیسیک Application تاریخ و زمان فعلی را برمی گرداند.
  • عملکرد تاریخ تاریخ جاری را برمی گرداند.
  • Format تابع تاریخ و زمان را در هر قالب دلخواه نمایش می دهد.

نتیجه گیری

با استفاده از این روش ها می توانید دریافت و نمایش دهیدتاریخ و زمان فعلی در ماکرو در اکسل. آیا هیچ سوالی دارید؟ از ما بپرسید.

هیو وست یک مربی و تحلیلگر اکسل بسیار با تجربه با بیش از 10 سال تجربه در این صنعت است. وی دارای مدرک لیسانس در رشته حسابداری و امور مالی و مدرک کارشناسی ارشد در رشته مدیریت بازرگانی است. هیو علاقه زیادی به تدریس دارد و یک رویکرد آموزشی منحصر به فرد ایجاد کرده است که به راحتی قابل پیگیری و درک است. دانش تخصصی او از اکسل به هزاران دانش آموز و متخصص در سراسر جهان کمک کرده تا مهارت های خود را بهبود بخشند و در حرفه خود برتری پیدا کنند. هیو از طریق وبلاگ خود دانش خود را با جهان به اشتراک می گذارد و آموزش های رایگان اکسل و آموزش آنلاین ارائه می دهد تا به افراد و مشاغل کمک کند تا به پتانسیل کامل خود دست یابند.