Skip to main content
 

Conas lasc ama comhaireamh síos a chur isteach in Excel?

Údar: Sun Athraithe Deiridh: 2024-08-02

Más mian leat déileáil le roinnt sonraí in achar teoranta ama, is féidir leat lasc ama comhaireamh síos a chur isteach i do bhileog oibre sonraí, agus nuair a bheidh an comhaireamh síos ama críochnaithe, beidh dialóg popped out ann le cur i gcuimhne duit. Inseoidh mé duit cód VBA anseo chun lasc ama comhaireamh síos a chur isteach in Excel.

Cuir isteach an lasc ama comhaireamh síos in Excel


Cuir isteach an lasc ama comhaireamh síos in Excel

In Excel, ní féidir leis an t-am a chomhaireamh, ach is féidir leat an cód VBA a leanúint a chóipeáil chun cabhrú leis an am a chomhaireamh.

1. Roghnaigh cill agus formáidigh í mar fhormáidiú ama trí chliceáil ar dheis ar an gcill agus roghnú Cealla Formáid, ansin sa dialóg, cliceáil Am agus a roghnú 13:30:55 sa cineál liosta, ag cliceáil ar deireadh OK chun an dialóg seo a fhágáil. Féach an pictiúr:

seat a thaispeánann conas an dialóg Formáid Cealla a oscailt
seat den saighead
gabháil scáileáin den fhormáidiú cille a athrú go Am

2. Clóscríobh an t-am a theastaíonn uait comhaireamh síos sa chill formáidithe. Féach an pictiúr:

gabháil scáileáin a thaispeánann an t-am sa chill

3. Brúigh Alt + F11 eochracha le hoscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

4. cliceáil Ionsáigh > Modúil agus ansin cóipeáil an VBA seo a leanas san fhuinneog nua.

VBA: Uaineadóir comhaireamh síos.

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

Leid: Léiríonn E1 sa chód thuas an chill ama a chlóscríobhann tú i gcéim 2.

5. cliceáil Rith cnaipe nó brúigh F5 chun an lasc ama comhaireamh síos a rith. Anois déantar an t-am a chomhaireamh síos.

gabháil scáileáin den chomhaireamh síos ag tosú tar éis an cód a rith

6. Agus an comhaireamh síos críochnaithe, meabhróidh dialóg popped duit.

scáileán a thaispeánann an comhaireamh síos críochnaithe

Leid: Ní féidir leat an comhaireamh síos a stopadh agus é ag rith ach an leabhar oibre a dhúnadh.


Uirlisí Táirgiúlachta Oifige is Fearr

🤖 Kutools AI Aide: anailís sonraí a réabhlóidiú bunaithe ar: Forghníomhú Chliste   |  Gin Cód  |  Cruthaigh Foirmlí Saincheaptha  |  Anailís a dhéanamh ar Sonraí agus Cairteacha a Ghin  |  Feidhmeanna Kutools a agairt...
Gnéithe Coitianta: Faigh, Aibhsigh nó Aithnigh Dúblaigh   |  Scrios Sraitheanna Bána   |  Comhcheangail Colúin nó Cealla gan Sonraí a Chailleadh   |   Babhta gan Foirmle ...
Cuardaigh Super: Ilchritéir VLookup    VLookup Illuachanna  |   VLookup Trasna Ilbhileoga   |   Amharc doiléir ....
Liosta anuas Casta: Go tapa Cruthaigh Liosta Anuas   |  Liosta anuas Cleithiúnach   |  Liosta Buail Isteach Ilroghnacha ....
Bainisteoir Colún: Cuir Líon Sonrach Colún leis  |  Colúin Bog  |  Scoránaigh Stádas Infheictheachta na gColún Ceilte  |  Déan comparáid idir Raonta & Colúin ...
Gnéithe Réadmhaoin: Fócas Eangaí   |  Amharc Dearaidh   |   Barra Mór na Foirmle    Leabhar Oibre & Bainisteoir Bileog   |  Leabharlann Acmhainní (Uaththéacs)   |  Piocálaí Dáta   |  Comhcheangail Bileoga Oibre   |  Criptigh/Díchriptigh Cealla    Seol Ríomhphost trí Liosta   |  Scagaire Super   |   Scagaire Speisialta (scagaire trom/iodálach/stailc tríd...) ...
Barr 15 Uirlisí12 Téacs uirlisí (Cuir Téacs, Bain Carachtair,...)   |   50 + Cairt cineálacha (Cairt Gantt,...)   |   40+ Praiticiúil Foirmlí (Ríomh aois bunaithe ar lá breithe,...)   |   19 Insertion uirlisí (Cuir isteach Cód QR, Ionsáigh Pictiúr ón gCosán,...)   |   12 Tiontú uirlisí (Uimhreacha le Focail, Comhshó Airgeadra,...)   |   7 Cumaisc & Scoilt uirlisí (Sraitheanna Comhcheangail Casta, Cealla Scoilt,...)   |   ... agus eile

Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am.  Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...


Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!