photosdematures.com

VBA Ngayon Pag-andar

Nangangahulugan ngayon ang kasalukuyang petsa, sa worksheet Ngayon ang function ay gumagawa ng parehong bagay na nagbibigay sa amin ng kasalukuyang petsa at oras ngunit walang inbuilt ngayon na pag-andar sa VBA mismo, ang pamamaraan upang makuha ang kasalukuyang petsa ng system ay sa pamamagitan ng paggamit ng pag-andar ng petsa at hindi katulad ng pagpapaandar ngayon ng petsa ng pag-andar ay nagbibigay lamang sa amin ng kasalukuyang petsa.

Sa excel mayroon kaming maraming mga kapaki-pakinabang na pag-andar na makakatulong sa amin sa araw-araw. Ginawa ng Excel ang lahat ng aming buhay sa lugar ng trabaho. Kapag sinabi kong ang "araw-araw" na excel ay may pormula upang ibalik din ang petsa ngayon, hindi lamang petsa, maaari din nating makuha ang kasalukuyang petsa at oras. Tulad nito ang pagkakaiba-iba ng mga excel na formula. Kung ikaw ay isang regular na gumagamit ng excel inaasahan kong napagtagumpayan mo ang formula na tinatawag na "NGAYONG ARAW" sa excel upang maipasok ang kasalukuyang petsa tulad ng ipinapakita sa iyong gumaganang computer. Ngunit wala kaming function na TODAY sa VBA, kung gayon paano namin makukuha ang petsa ng TODAY mula sa VBA. Ipapakita sa iyo ng artikulong ito kung paano magtrabaho kasama ang petsa NGAYON sa VBA. Basahin mo pa.

Ano ang Formula upang makuha ang Petsa ng Ngayon sa VBA?

Kung walang pormula na tinatawag na NGAYON kung gayon paano tayo makakakuha ng petsa ngayon mula sa VBA? Ito ang karaniwang tanong na tinatanong ng lahat ngunit ang solusyon ay simple mayroon kaming isang formula na may iba't ibang pangalan ibig sabihin DATE function.

Anong Pag-andar ng Petsa ang Ginagawa sa VBA?

Ang DATE ay eksaktong kapareho ng pagpapaandar ng VBA TODAY ngunit hindi ito isang pabagu-bago na pag-andar maliban kung patakbuhin mo ang macro o ma-trigger ang macro.

Ang syntax ng pagpapaandar ng DATE ay walang anumang mga argument na kailangan lang namin upang maipasa ang pag-andar DATE na lang.

PETSA ()

Mga halimbawa ng Pag-andar ng Petsa sa VBA

DATE function upang ibalik ang kasalukuyang petsa ng system. Napaka kapaki-pakinabang nito kapag ginamit namin ito bilang bahagi ng malaking proyekto ng VBA. Upang magkaroon ng patas na kaalaman tungkol dito, ipapakita ko sa iyo ang mga simpleng halimbawa ng pagpapaandar ng DATE.

Halimbawa # 1

Lumikha tayo ng isang simpleng pag-andar ng DATE upang maipakita ang kasalukuyang petsa sa kahon ng mensahe. Sundin ang mga hakbang sa ibaba upang isulat ang excel macro.

Hakbang 1: Lumikha ng isang subprocedure sa pamamagitan ng pagbibigay ng pangalan ng macro.

Hakbang 2: Ipahayag ang variable bilang "Petsa". Ibinabalik ng pagpapaandar ng DATE ang resulta bilang petsa lamang kaya ang variable na uri ng data ay dapat na "Petsa".

Code:

 Sub Ngayon_Example1 () Dim K Bilang String End Sub 

Hakbang 3: Italaga ang halaga sa variable na "k" bilang DATE function.

Code:

 Sub Ngayon_Example1 () Dim K Bilang String K = Petsa ng Pagtatapos Sub 

Hakbang 4: Ngayon ang halaga ng variable na "k" sa message box sa VBA.

Code:

 Sub Ngayon_Example1 () Dim K Bilang String K = Petsa MagBox K End Sub 

Patakbuhin ang code na dapat nating makita ang kasalukuyang petsa tulad ng ipinapakita sa system.

Tandaan: Maaaring mag-iba ang format ng petsa batay sa mga setting ng system. Maaari itong nasa "mm-dd-yy", "dd-mm-yy".

Ang Pag-andar ng Petsa upang mahanap ang Dapat ay Ngayon

Ang pagpapaandar ng petsa ay mas kapaki-pakinabang sa konteksto ng paghahanap ng mga takdang petsa ng EMI, pagbabayad ng Credit Card, Pagbabayad ng Seguro, atbp.

Ipagpalagay na nagtatrabaho ka bilang isang opisyal sa pagbawi ng utang at mayroon kang isang listahan ng mga customer na may kanilang takdang halaga at takdang petsa.

Sa haligi ng katayuan, kailangan mo ang resulta bilang "Dahil sa Ngayon" kung ang takdang petsa ay katumbas ng kasalukuyang petsa ng system.

Maaari itong magawa sa pamamagitan ng paggamit ng kundisyon na KUNG at mga loop sa VBA. Nasa ibaba ang handa na code para sa iyo na makarating sa mga resulta.

Code:

 Sub Ngayon_Example2 () Dim K Bilang Integer Para sa K = 2 Hanggang 11 Kung Mga Cell (K, 3). Halaga = Petsa Pagkatapos ng Mga Cell (K, 4). Halaga = "Nasa Araw na Ngayon" Ang Iba Pang Mga Cell (K, 4). Halaga = "Hindi Ngayon" Tapusin Kung Susunod K End Sub 

Makakarating ito sa mga resulta sa haligi ng katayuan.

Tulad nito sa maraming mga sitwasyon, maaari naming gamitin ang pagpapaandar ng DATE upang suriin ang mga petsa at magsagawa ng ilang uri ng pagkilos.

Maaari mong i-download ang VBA Today Function dito. VBA Ngayon Pag-andar ng Template ng Excel