Sut i Gael y Dyddiad Cyfredol yn VBA (3 Ffordd)

Hugh West

16-10-2023 Macros & Excel VBA
  • Rhannu Hwn
Hugh West

Yn yr erthygl hon, byddaf yn dangos i chi sut y gallwch chi gael y dyddiad cyfredol yn VBA yn Excel. Byddwch yn dysgu dangos y dyddiad cyfredol, dangos yr amser presennol, yn ogystal â fformatio'r dyddiad a'r amser yn y fformat a ddymunir.

Sut i Gael y Dyddiad Presennol yn VBA (Gwedd Gyflym)

Lawrlwythwch Gweithlyfr Ymarfer

Lawrlwythwch y llyfr ymarfer hwn i ymarfer y dasg tra byddwch yn darllen yr erthygl hon.

<8 Cael Dyddiadau Cyfredol yn VBA.xlsm

3 Ffordd o Gael y Dyddiad Cyfredol yn VBA

Gadewch i ni archwilio'r ffyrdd gorau o gael y presennol dyddiad ac amser mewn Macro yn VBA .

1. Cael Dyddiad Cyfredol erbyn Swyddogaeth Dyddiad VBA

Yn gyntaf oll, gadewch i ni weld sut y gallwn gael y dyddiad cyfredol. Gallwch gael y dyddiad cyfredol yn VBA yn eithaf cynhwysfawr gan ddefnyddio'r ffwythiant Dyddiad o VBA .

Llinell y cod fydd:<3 Current_Date=Date()

Y cod cyflawn i ddangos y dyddiad cyfredol fydd:

⧭ Cod VBA: 

5824

Sylwer: Mae'r cod hwn yn creu Macro o'r enw Get_Current_Date .

⧭ Allbwn:

Rhedwch y Macro hwn , a byddwch yn cael Blwch Negeseuon yn dangos y dyddiad cyfredol, 11-Ionawr-22 .

Darllenwch fwy: Sut i Mewnosod Dyddiad Presennol yn Excel

9> 2. Mewnosod Dyddiad ac Amser Cyfredol erbyn Swyddogaeth Nawr VBA

Gallwch ddefnyddio'r swyddogaeth Nawr o VBA i gaely dyddiad cyfredol ynghyd â'r amser presennol.

Llinell y cod fydd:

Current_Date_and_Time = Now()

Felly, y cod cyflawn i ddangos y dyddiad a'r amser cyfredol fydd:

⧭ Cod VBA: 

5105

Sylwer: Hyn cod yn creu Macro o'r enw Get_Current_Date_and_Time .

⧭ Allbwn:

Rhedwch y Macro hwn, a byddwch yn cael Blwch Neges yn dangos y dyddiad a'r amser cyfredol, 11-Jan-22 11:23:20 AM .

Darllenwch fwy: Nawr a Fformatiwch Swyddogaethau yn Excel VBA

Darlleniadau Tebyg

  • Dyddiad Amrywiadwy mewn Codau VBA (7 Defnydd o Macros gydag Enghreifftiau)
  • Sut i Ddefnyddio Llwybr Byr Dyddiad Excel
  • Cyfrifo Dyddiad Dyledus gyda Fformiwla yn Excel (7 Ffordd)
  • Sut i Ddefnyddio Fformiwla IF gyda Dyddiadau (6 Enghraifft Hawdd)
<9 3. Fformat Dyddiad ac Amser Cyfredol yn ôl Swyddogaeth Fformat VBA

Hyd yn hyn, rydym wedi dysgu cael y dyddiad a'r amser cyfredol. Y tro hwn, gadewch i ni weld sut y gallwn ddangos y dyddiad a'r amser yn y fformat a ddymunir.

3.1 Fformat Dyddiad Presennol

Yn gyntaf, byddwn yn fformatio'r dyddiad cyfredol yn unig .

Byddwn yn defnyddio'r ffwythiant Fformat o VBA at y diben hwn. cystrawen y ffwythiant yw:

=Format(Date,Format)

Felly, i ddangos y dyddiad cyfredol yn y fformat dd/mm/bbbb , llinell y cod fydd:

Current_Date = Fformat(Dyddiad,“dd/mm/bbbb”)

A'r cod VBA cyflawn fydd:

⧭ Cod VBA: 

3219

Sylwer: Mae'r cod hwn yn creu Macro o'r enw Fformat_Date_and_Time .

⧭ Allbwn:

Os ydych yn rhedeg y cod hwn, bydd yn dangos y dyddiad cyfredol yn y fformat a ddymunir, dd/mm/bbbb , 11/01/2022 .

3.2 Fformat Dyddiad ac Amser Presennol

Chi hefyd yn gallu defnyddio'r ffwythiant Fformat i fformatio'r dyddiad cyfredol a'r amser cyfredol gyda'i gilydd.

Dewch i ni ddangos y dyddiad a'r amser cyfredol yn y fformat dd/mm/bbbb hh:mm :ss am/pm .

Llinell y cod fydd:

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

A'r cod VBA cyflawn fydd:

⧭ Cod VBA: 

6123

Sylwer: Mae'r cod hwn yn creu Macro Galwodd Fformat_Date_and_Time .

⧭ Allbwn:

Os ydych rhedeg y cod hwn, bydd yn dangos y dyddiad a'r amser cyfredol yn eich fformat dymunol, dd/mm/bbbb hh:mm:ss am/pm , 11/01/2022 1> 12:03:45 pm .

<3

Darllenwch fwy: Sut i Fformatio Dyddiad gyda VBA yn Excel

Crynodeb

  • Y NAWR mae ffwythiant Cais Sylfaenol Gweledol yn dychwelyd y dyddiad a'r amser cyfredol.
  • Mae ffwythiant Dyddiad yn dychwelyd y dyddiad cyfredol.
  • Fformat Mae ffwythiant yn dangos dyddiad ac amser mewn unrhyw fformat dymunol.

Casgliad

Gan ddefnyddio'r dulliau hyn, gallwch gael ac arddangos ydyddiad ac amser cyfredol mewn Macro yn Excel. Oes gennych chi unrhyw gwestiynau? Mae croeso i chi ofyn i ni.

Post blaenorol Sut i Drosi PDF yn Excel heb Golli Fformatio (2 Ffordd Hawdd)
Post nesaf Amlygwch Dyblygiadau ar draws Taflenni Gwaith Lluosog yn Excel (3 Fformiwla)

Mae Hugh West yn hyfforddwr a dadansoddwr Excel hynod brofiadol gyda dros 10 mlynedd o brofiad yn y diwydiant. Mae ganddo radd Baglor mewn Cyfrifeg a Chyllid a gradd Meistr mewn Gweinyddu Busnes. Mae gan Hugh angerdd am addysgu ac mae wedi datblygu dull addysgu unigryw sy’n hawdd ei ddilyn a’i ddeall. Mae ei wybodaeth arbenigol o Excel wedi helpu miloedd o fyfyrwyr a gweithwyr proffesiynol ledled y byd i wella eu sgiliau a rhagori yn eu gyrfaoedd. Trwy ei flog, mae Hugh yn rhannu ei wybodaeth gyda’r byd, gan gynnig tiwtorialau Excel am ddim a hyfforddiant ar-lein i helpu unigolion a busnesau i gyrraedd eu llawn botensial.