Skip i'r prif gynnwys

Sut i fewnosod amserydd cyfrif yn Excel?

Awdur: Haul Wedi'i Addasu Diwethaf: 2024-08-02

Os ydych chi am drin â rhywfaint o ddata mewn amser cyfyngedig, gallwch fewnosod amserydd cyfrif i lawr yn eich taflen waith data, ac wrth orffen y cyfrif amser, bydd deialog popped allan i'ch atgoffa. Yma, dywedaf wrthych god VBA i fewnosod amserydd cyfrif yn Excel.

Mewnosod amserydd cyfrif i lawr yn Excel


Mewnosod amserydd cyfrif i lawr yn Excel

Yn Excel, ni all gyfrif amser, ond gallwch chi gopïo'r cod VBA canlynol i helpu i gyfrif yr amser.

1. Dewiswch gell a'i fformatio fel fformat amser trwy glicio ar y gell yn iawn a'i dewis Celloedd Fformat, yna yn y dialog, clicio amser a dewis 13:30:55 yn y math rhestr, o'r diwedd yn clicio OK i adael y dialog hwn. Gweler y screenshot:

sgrinlun yn dangos sut i agor y deialog Celloedd Fformat
sgrinlun o saeth
sgrinlun o newid fformatio'r gell i Amser

2. Teipiwch yr amser rydych chi am ei gyfrif yn y gell fformatio. Gweler y screenshot:

sgrinlun yn dangos yr amser yn y gell

3. Gwasgwch Alt + F11 allweddi i agor Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

4. Cliciwch Mewnosod > Modiwlau ac yna copïwch yn dilyn VBA i'r ffenestr newydd.

VBA: Amserydd cyfrif i lawr.

Dim gCount As Date
'Updateby20140925
Sub Timer()
    gCount = Now + TimeValue("00:00:01")
    Application.OnTime gCount, "ResetTime"
End Sub
Sub ResetTime()
Dim xRng As Range
Set xRng = Application.ActiveSheet.Range("E1")
xRng.Value = xRng.Value - TimeSerial(0, 0, 1)
If xRng.Value <= 0 Then
    MsgBox "Countdown complete."
    Exit Sub
End If
Call Timer
End Sub

Tip: Mae E1 yn y cod uchod yn nodi'r gell amser rydych chi'n ei theipio yn y cam 2.

5. Cliciwch Run botwm neu wasg F5 i redeg yr amserydd cyfrif i lawr. Nawr mae'r amser yn cael ei gyfrif i lawr.

sgrinlun o'r cyfrif i lawr yn dechrau ar ôl rhedeg y cod

6. A phan fydd y cyfrif i lawr wedi gorffen, bydd deialog popped allan yn eich atgoffa.

sgrinlun yn dangos y cyfrif i lawr wedi'i gwblhau

Tip: Ni allwch atal y cyfrif i lawr pan fydd yn rhedeg ac eithrio cau'r llyfr gwaith.


Offer Cynhyrchiant Swyddfa Gorau

🤖 Kutools AI Aide: Chwyldro dadansoddi data yn seiliedig ar: Cyflawniad Deallus   |  Cynhyrchu Cod  |  Creu Fformiwlâu Personol  |  Dadansoddi Data a Chynhyrchu Siartiau  |  Invoke Swyddogaethau Kutools...
Nodweddion Poblogaidd: Darganfod, Amlygu neu Adnabod Dyblygiadau   |  Dileu Rhesi Gwag   |  Cyfuno Colofnau neu Gelloedd heb Colli Data   |   Rownd heb Fformiwla ...
Super-edrych: VLookup Meini Prawf Lluosog    VLookup Gwerth Lluosog  |   VLookup Ar Draws Taflenni Lluosog   |   Edrych Niwlog ....
Rhestr gwympo Uwch: Creu Rhestr Gollwng yn Gyflym   |  Rhestr Gollwng Dibynnol   |  Rhestr Gollwng Aml-ddewis ....
Rheolwr Colofn: Ychwanegu Nifer Penodol o Golofnau  |  Symud Colofnau  |  Toglo Statws Gwelededd Colofnau Cudd  |  Cymharwch Ystodau a Cholofnau ...
Nodweddion dan Sylw: Ffocws ar y Grid   |  Golwg Dylunio   |   Bar Fformiwla Mawr    Rheolwr Llyfr Gwaith a Thaflen   |  Llyfrgell Adnoddau (Testun Auto)   |  Dewiswr Dyddiad   |  Cyfuno Taflenni Gwaith   |  Amgryptio/Dadgryptio Celloedd    Anfon E-byst trwy Restr   |  Hidlo Super   |   Hidlo Arbennig (hidlo mewn print trwm/italig/strikethrough...) ...
15 Set Offer Gorau12 Testun offer (Ychwanegu Testun, Dileu Cymeriadau,...)   |   50 + Siart Mathau (Siart Gantt,...)   |   40+ Ymarferol Fformiwlâu (Cyfrifwch oedran yn seiliedig ar ben-blwydd,...)   |   19 mewnosod offer (Mewnosod Cod QR, Mewnosod Llun o'r Llwybr,...)   |   12 Trosi offer (Rhifau i Eiriau, Trosi arian cyfred,...)   |   7 Uno a Hollti offer (Rhesi Cyfuno Uwch, Celloedd Hollt,...)   |   ... a mwy
Defnyddiwch Kutools yn eich dewis iaith – mae'n cefnogi Saesneg, Sbaeneg, Almaeneg, Ffrangeg, Tsieinëeg, a 40+ o ieithoedd eraill!

Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser.  Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...


Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!