En timer i ett Excel-ark kan vara till hjälp på en gång - känslig plåt , så att användaren kan hålla reda på hur mycket tid de har kvar innan en viss händelse eller deadline . Medan Excel inte har en nedräkning funktion eller egenskap , kan du använda den inbyggda Visual Basic for Applications ( VBA ) programmeringsspråk för att skapa en nedräkning i en enda Excel-cell . Instruktioner
1
Öppna Excel 2010 -kalkylblad där du vill lägga till en timer . Högerklicka på den cell där du vill att timern ska gå och välja " Formatera celler . " Klicka på " Anpassad " på vänster sida av fönstret som visas och välj sedan " h : mm : ss " i listan till höger . Klicka på " OK " för att fortsätta .
2
Håll ner " Alt " och tryck på " F11 " för att öppna upp VBA -konsolen . Välj din aktuella kalkylbladet från listan på vänster sida av konsolen . Klicka på den lilla pilen bredvid " Infoga UserForm " knappen längst upp på skärmen , som är den andra knappen från vänster , och välj " Modul " från listan med alternativ som visas . . Dubbelklicka på " Modul 1 " när den visas i listan
3
Klicka på vitt utrymme på höger sida av skärmen och skriv in följande kod :
sub tidsåtgång ( ) katalog
Dim CountDown Som Datum
CountDown = nu + TimeValue ( " 00:00:01 " ) katalog
Application.OnTime nedräkning, " Realcount "
End Sub
Denna kod gör att resten av koden för att bearbeta en gång varje sekund .
4
Tryck enter för att få tillgång till en ny linje på sidan . Skriv till följande kod :
Sub Realcount ( ) katalog
Dim räkna Som Range
Set count = [ E1 ]
count.Value = count.Value - TimeSerial ( 0 , 0 , 1 ) katalog p Om count < = 0 Then
MsgBox " . Countdown komplett "
Exit Sub
End If
Call tidsåtgång
End Sub
Change " E1 " till vad cell du vill använda för nedräkningen . Denna kod gör den verkliga nedräkningen och kontroller för att se om nedräkningen är klar .
5
Klicka på " X " i övre högra hörnet på konsolen för att stänga den .
6
Markera cellen som du använder för din nedräkning och ange önskade tiden . Se till att du anger timmar, minuter och sekunder , även om timmar och minuter är noll . " 2:30 " är två timmar och trettio minuter , " 00:02:30 " är två minuter och trettio sekunder
7
Klicka på " Utvecklare " fliken längst upp på skärmen , och . klicka sedan på " Makron " knappen på vänster sida av bandet . Välj " tidsåtgång " från listan och klicka på " Kör". Din Nedräkningen startar och det kommer att fortsätta tills det blir till noll , då kommer du att se ett meddelande ruta som förklarar att nedräkningen är klar .
