En nedtelling i et Excel-regneark kan være nyttig på en gang-sensitive ark , slik at brukeren kan holde oversikt over hvor mye tid de har igjen før en gitt hendelse eller frist . Mens Excel ikke har en nedtelling funksjon eller egenskap , kan du bruke den innebygde Visual Basic for Applications ( VBA ) programmeringsspråk for å lage en nedtelling i en enkelt Excel celle . Instruksjoner
en
Åpne Excel 2010 -regneark der du vil legge til en nedtelling . Høyreklikk på cellen der du vil timeren å gå og velg " Formater celler. " Klikk på " Custom" på venstre side av vinduet som vises, og velg deretter " t: mm : ss " fra listen til høyre. Klikk " OK " for å fortsette .
2
Hold nede "Alt" og trykk " F11 " for å åpne opp VBA -konsollen . Velg gjeldende regneark fra listen på venstre side av konsollen . Klikk på den lille pilen ved siden av " Sett UserForm "-knappen på toppen av skjermen , som er den andre knappen fra venstre side , og velg " Module" fra listen over alternativer som vises . . Dobbeltklikk på " Modul 1 " når det vises i listen
3
Klikk det hvite området på høyre side av skjermen, og skriv inn følgende kode :
sub Tellesystem ( )
Dim CountDown Som Date
CountDown = Now + TimeValue ( " 00:00:01 ")
Application.OnTime CountDown , " Realcount "
End Sub
Denne koden vil tillate resten av koden for å behandle en gang hver andre .
4
Trykk på enter for å få tilgang til en ny linje på siden . Skriv inn følgende kode :
Sub Realcount ( )
Dim teller As Range
Set count = [ E1 ]
count.Value = count.Value - TimeSerial ( 0 , 0 , 1 )
p Hvis tall < = 0 Then
MsgBox " . Countdown komplett"
Exit Sub
End If
Ring Tellesystem
End Sub
Change " E1 " til hva cellen du vil bruke for nedtellingen . Denne koden gjør selve nedtelling og sjekker for å se om nedtellingen er fullført.
5
Klikk på "X" i øvre høyre hjørne av konsollen for å lukke det .
6
Velg den cellen som du bruker for nedtelling din og skrive inn ønsket nedtellingstid . Pass på at du skriver inn timer, minutter og sekunder , selv om timer og minutter er null. " 2:30 " er to timer og tretti minutter , " 0:02:30 " er to minutter og tretti sekunder
7
Klikk på " Utvikler " fanen øverst på skjermen , og . klikk deretter på " Makroer "-knappen på venstre side av båndet . Velg " Tellesystem " fra listen og klikk "Run . " Din nedtellingen vil starte, og det vil fortsette inntil det blir til null , da vil du se en melding som forklarer at nedtellingen er fullført.