Note: The other languages of the website are Google-translated. Back to English

Ինչպե՞ս ստեղծել վայրկյանաչափ Excel- ի աշխատանքային թերթում:

Եթե ​​ձեր աշխատաթերթում կա վայրկյանաչափ, դուք կիմանաք գործն ավարտելու ժամանակը: Ինչպե՞ս կարող եք թերթի մեջ վայրկյանաչափ ստեղծել Start, Stop և Reset կոճակներով, ինչպես ցույց է տրված հետևյալ նկարը: Եթե ​​սեղմեք «Սկսել» կոճակը, այն կսկսվի ժամանակը, եթե կտտացրեք «Կանգնեցնել» կոճակը, այն կդադարեցնի ժամանակը, և «Վերականգնել» կոճակը կօգնի ձեզ վերականգնել ժամանակը: Այս հոդվածում ես կխոսեմ այն ​​մասին, թե ինչպես ստեղծել պարզ և հարմար վայրկյանաչափ Excel- ում:

doc ստեղծել վայրկյանաչափ 1

Ստեղծեք վայրկյանաչափ երեք կոճակներով ՝ օգտագործելով VBA կոդ


Ստեղծեք վայրկյանաչափ երեք կոճակներով ՝ օգտագործելով VBA կոդ

Երեք կոճակներով վայրկյանաչափ ստեղծելու համար `Սկսել, Կանգնեցնել և Վերագործարկել, կատարեք հետևյալ քայլերը մեկ առ մեկ:

Նախ, տեղադրեք հրամանի երեք կոճակ:

1: Սեղմեք Երեվակիչ > Տեղադրել > Հրամանի կոճակ, տես նկարի նկարը.

doc ստեղծել վայրկյանաչափ 2

2, Դրանից հետո մկնիկը քաշեք կոճակ նկարելու համար, կոճակը տեղադրելուց հետո կարող եք փոխել կոճակի վերնագիրը, խնդրում ենք կտտացնել Երեվակիչ > ՀատկություններԷ, ապա Հատկություններ երկխոսություն, մուտքագրեք նոր վերնագիր «սկիզբ”Այս կոճակի համար ՝ տեքստային տուփի կողքին Ձերբակալություն, տես սքրինշոթեր.

doc ստեղծել վայրկյանաչափ 3 2 doc ստեղծել վայրկյանաչափ 4

3, Կրկնեք վերոհիշյալ երկու քայլերը `մյուս երկու կոճակները տեղադրելու համար և վերնագրելով դրանք որպես«Դադարեցնել"Եւ"Նորից դնել”, Տե՛ս սքրինշոթը.

doc ստեղծել վայրկյանաչափ 5

4, Կոճակները մտցնելուց հետո կտտացնելով պետք է դուրս գալ նախագծման ռեժիմից Երեվակիչ > Դիզայնի ռեժիմ.

Երկրորդ, ստեղծեք VBA կոդ:

5, Եվ այնուհետև աջ կտտացրեք ընթացիկ աշխատանքային էջի ներդիրին և ընտրեք Դիտել կոդը, դուրս ցցված Microsoft Visual Basic հավելվածների համար պատուհանը, խնդրում ենք պատճենեք և տեղադրեք հետևյալ կոդը ՝ Թերթի կոդը:

VBA կոդ. Ստեղծեք վայրկյանաչափ:

Public StopIt As Boolean
Public ResetIt As Boolean
Public LastTime
Private Sub CommandButton1_Click()
Dim StartTime, FinishTime, TotalTime, PauseTime
StopIt = False
ResetIt = False
If Range("C2") = 0 Then
  StartTime = Timer
  PauseTime = 0
  LastTime = 0
Else
  StartTime = 0
  PauseTime = Timer
End If
StartIt:
  DoEvents
  If StopIt = True Then
    LastTime = TotalTime
    Exit Sub
  Else
    FinishTime = Timer
    TotalTime = FinishTime - StartTime + LastTime - PauseTime
    TTime = TotalTime * 100
    HM = TTime Mod 100
    TTime = TTime \ 100
    hh = TTime \ 3600
    TTime = TTime Mod 3600
    MM = TTime \ 60
    SS = TTime Mod 60
    Range("C2").Value = Format(hh, "00") & ":" & Format(MM, "00") & ":" & Format(SS, "00") & "." & Format(HM, "00")
    If ResetIt = True Then
      Range("C2") = Format(0, "00") & ":" & Format(0, "00") & ":" & Format(0, "00") & "." & Format(0, "00")
      LastTime = 0
      PauseTime = 0
      End
    End If
    GoTo StartIt
  End If
End Sub
Private Sub CommandButton2_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
  StopIt = True
End Sub
Private Sub CommandButton3_Click()
  Range("C2").Value = Format(0, "00") & ":" & Format(0, "00") & ":" & Format(0, "00") & "." & Format(0, "00")
  LastTime = 0
  ResetIt = True
End Sub

doc ստեղծել վայրկյանաչափ 6

ՆշումՎերոհիշյալ ծածկագրում C2 այն բջիջն է, որտեղ տեղադրվելու է վայրկյանաչափի ժամանակը, և CommandButton1, CommandButton2, CommandButton3 կոճակների անուններն են, կոճակի ճշգրիտ անունը կարող եք դիտել այստեղից Անունը Box, տես նկարի նկարը.

doc ստեղծել վայրկյանաչափ 7

Երրորդ ՝ ձևաչափեք վայրկյանաչափի ժամանակի բջիջը:

6, Ապա դուք պետք է ձևաչափեք ժամանակի բջիջը որպես Տեքստ ձևաչափով, և ըստ անհրաժեշտության կարող եք փոխել բջջի չափը, տառատեսակը, տառատեսակի գույնը, ֆոնը և այլն: տե՛ս նկարը.

doc ստեղծել վայրկյանաչափ 8

7, Վերը նշված քայլերն ավարտելուց հետո, այսուհետ, երբ կտտացնում եք սկիզբ կոճակը, ժամանակը կսկսվի հիմա և կտտացրեք Դադարեցնել կոճակը, այն կկանգնեցնի ժամանակը, Նորից դնել կոճակը կվերականգնի ժամանակը, տես նկարի նկարը.

doc ստեղծել վայրկյանաչափ 9


Դեմո. Ստեղծեք վայրկյանաչափ երեք կոճակներով ՝ օգտագործելով VBA կոդ


Գրասենյակի արտադրողականության լավագույն գործիքները

Excel-ի համար Kutools-ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80%-ով

  • Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
  • Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
  • Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
  • Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
  • Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
  • Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
  • Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
  • Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
  • Ավելի քան 300 հզոր հատկություններ. Աջակցում է Office / Excel 2007-2021 և 365: Աջակցում է բոլոր լեզուներին: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հնարավորություններ 30-օրյա անվճար փորձարկում: 60-օրյա գումարի վերադարձի երաշխիք:
kte էջանիշը 201905

Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
officetab ներքևում
Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (32)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Շնորհակալություն այս գրառման համար, այն շատ օգտակար էր: Այնուամենայնիվ, կա՞ տարբերակ կսմթելու կոդը, որպեսզի այն ստեղծվի այնպես, որ ժամանակաչափը չդադարի, երբ բջիջը խմբագրվում է: Իդեալում ես կցանկանայի սեղմել «Սկսել», մի շարք փոփոխություններ կատարել նույն ներդիրի մի շարք բջիջներում, այնուհետև սեղմել «Կանգնեցնել»՝ անցած ընդհանուր ժամանակի համար: Այս մասին ցանկացած խորհուրդ մեծապես երախտապարտ կլինի:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
երբևէ հասկացե՞լ եք սա Ես նույնպես պետք է աշխատացնեմ ժամանակաչափը, մինչ նույն աղյուսակում այլ փոփոխություններ են կատարվում: շնորհակալություն։ Մայք
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Սա մեծ օգնություն էր և շատ հեշտ էր հետևել քայլերին:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Փորձել եմ ստեղծել կանգառի ժամացույց՝ օգտագործելով Forms-ի նույն կոդերը: Ժամաչափը միանգամայն լավ է սկսվում, բայց չի կանգնում: Խնդրում ենք առաջարկել, թե ինչպես կրկնել նույնը ձևաթղթերում
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Փորձեք XNote վայրկյանաչափը:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Կա՞ որևէ միջոց, որպեսզի ժմչփը հաշվում է մինչև որոշակի ժամանակ: Ես ուզում եմ պահպանել մեկնարկի, դադարեցման և վերակայման կոճակները, բայց ինձ անհրաժեշտ է, որ այն հաշվեմ մինչև մեկ րոպե միայն մեկ վայրկյան, երբ սեղմեմ «Սկսել»: Կամ հետհաշվարկեք մեկ րոպեից մեկ վայրկյան մինչև զրո (01:01): Շնորհակալություն ձեր օգնության համար:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Բարև Մելիսա,
Եթե ​​Ձեզ անհրաժեշտ է ստեղծել հետհաշվարկի ժմչփ աշխատաթերթում, գուցե հաջորդ հոդվածը կօգնի ձեզ:
https://www.extendoffice.com/documents/excel/2144-excel-countdown-timer.html
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Բարեւ,

Ես իսկապես տեսա այդ հոդվածը, բայց ինձ պետք է, որ այն ճիշտ նման լինի այս էջի կանգառի ժամացույցին, բայց ինձ անհրաժեշտ է, որ այն միայն մեկ րոպեից մեկ վայրկյանից հետ հաշվեմ: Ինձ անհրաժեշտ է, որ այն ցուցադրվի վայրկյանաչափի տեսքով, բայց աշխատի որպես հետհաշվարկ: Կա՞ լրացուցիչ խորհուրդ:


շնորհակալություն պատասխանելու համար։
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Դա ցուցատախտակի համար է, որը մենք նախագծել ենք excel-ում:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Հիանալի է, բայց հնարավո՞ր է նույն թերթիկում գործարկել 2 ժամացույց: պատրաստել են երկրորդ ժամացույցը նոր մեկնարկով, դադարեցնել և վերակայել կոճակը, բայց երկրորդ ժամացույցը սկսելիս առաջինը կանգ է առնում...
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
նույնը այստեղ կարող եք գտնել դրա բուժումը
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Բարև ընկերներ,
Այս մեթոդը կիրառվում է աշխատաթերթի միայն մեկ կոճակների վրա:
Եթե ​​կան այլ լավ գաղափարներ, խնդրում ենք մեկնաբանել այստեղ:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Հնարավո՞ր է ավտոմատ կերպով դադարեցնել ժմչփը, երբ էկրանը կողպվում է, և ավտոմատ կերպով միացնել ժամանակաչափը, երբ մենք ապակողպում ենք համակարգիչը:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Արդյո՞ք որևէ միջոց կա, որ ժամանակաչափը զրոյականացնի հաշվումը, բայց միևնույն ժամանակ ժամանակաչափը աշխատի: Այսինքն. Երբ ես սեղմում եմ «Վերականգնել» կոճակը, ես չեմ ուզում նորից սեղմել «Սկսել», որպեսզի ժամանակն ավարտվի:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ողջույն, ես օգտագործում եմ այս խցանը, բայց հաճախ թվերը ցուցադրման բջիջում («C2») սկսում են դուրս գալ և անջատվել. նրանք ցույց են տալիս մինուս նշաններ, թվանշանները սխալ են, և հաշվարկը կորչում է: Դա սովորաբար տեղի է ունենում մոտ մեկ ժամ կամ ավելի հետո, բայց երբեմն նույնիսկ մինչև մեկ ժամ անցնելը: Արդյո՞ք սա սովորական վրիպակ է: իսկ եթե այո, ապա կա՞ դա շտկելու միջոց: Ես հեռացրեցի .00-ը (այսինքն՝ միլիվայրկյանները) կոդից՝ պարզապես ջնջելով. & "-ը: & Ձևաչափ (0, «00») տողը որտեղ էլ որ հայտնվի, դա որևէ կապ ունի՞ այս խնդրի հետ:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Շնորհակալություն ձեր հուշման համար, այն սահուն էր աշխատում, բայց երբ ես մուտքագրում եմ որևէ տվյալ այս թերթիկում, այն դադարում է գործել, մեզ անհրաժեշտ է, որ այն շարունակի աշխատել մի քիչ մուտքագրման տվյալներ Ինչպե՞ս կարող ենք լուծել այս խնդիրը:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Բարև Նհոուն,
Հնարավոր է, որ այնտեղ ձեր խնդիրը լուծելու ոչ լավ ձևով: Երբ խմբագրում եք բջիջը, այն կդադարեցնի ընթացիկ մակրոյի աշխատանքը:
Եթե ​​ունեք որևէ այլ լավ մեթոդ, խնդրում ենք մեկնաբանել այստեղ:
Thank you!
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
ՈՂՋՈՒ՜ՅՆ. Ես ստեղծել եմ վայրկյանաչափը, բայց պետք է կարողանամ ունենալ սկզբի և կանգառի միջև տարբեր ընդմիջումներ, որպեսզի կարողանամ դրանք արտացոլել որպես ժամանակի և շարժման ուսումնասիրություն: Կա՞ն խորհուրդներ, թե ինչպես դա անել:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Կատարված են բոլոր քայլերը, բայց սեղմելով «Սկսել» կոճակը, հայտնվում է սխալի հաղորդագրություն «Հնարավոր չէ գործարկել մակրո «'file.xlsm'!CommandButton1»: Մակրոն կարող է հասանելի չլինել այս աշխատանքային գրքում կամ բոլոր մակրոները կարող են անջատված լինել: Բոլոր մակրոները միացված են, մակրոները գտնվում են Module1-ում: ԾԱՆՈԹՈՒԹՅՈՒՆ. Ես գործարկում եմ Office 2019-ը Mac-ի համար, որպեսզի դա կարող է խնդիր լինել…
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ի՞նչ կասեք այս կոդի մեջ «+10s» և «2x արագություն» գործառույթն ավելացնելու մասին:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
այստեղ «ժմչփը» փոփոխական է: չտեսնեք դրա համապատասխանությունը կոդում:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Հնարավո՞ր է հաշվիչին հասնել միայն վայրկյանների համար:
Այսպիսով, երբ այն հասնում է 59 վայրկյանի, այն շարունակում է 60, 61, 62, 63 ....
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Բարեւ Ձեզ
Հետևել եք քայլերին, բայց չեք կարող ժամանակ գտնել ժմչփի վանդակում հայտնվելու համար: Ես պատճենել եմ կոդը, բայց կարո՞ղ եմ ստուգել 1-ը: Որ տողերի համարները պետք չեն կամ դրանք2. Որ ես կոդը տեղադրեցի մոդուլ 1-ում, ոչ թե sheet1-ում կամ This workbook3-ում: Արդյո՞ք այս ամենն անելուց հետո մակրո ցուցակում մակրո ցուցակված լինի, իմը չկա:
Շնորհակալություն
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ողջույն, Ջենիս, Դուք պետք է կոդը տեղադրեք ձեր ակտիվ թերթիկի մոդուլում՝ որպես քայլ 5:
5. Այնուհետև աջ սեղմեք ընթացիկ աշխատաթերթի ներդիրին և ընտրեք Դիտել կոդը, Microsoft Visual Basic հավելվածների համար բացված պատուհանում, խնդրում ենք պատճենեք և տեղադրեք հետևյալ կոդը Մոդուլում:

Եվ դուք պետք է փոխեք կոճակի անունը ձեր սեփականի վրա:
Նշում. Վերոնշյալ կոդում C2-ն այն բջիջն է, որտեղ տեղադրվելու է վայրկյանաչափի ժամանակը, և CommandButton1, CommandButton2, CommandButton3 կոճակների անուններն են, դուք կարող եք դիտել կոճակի ճշգրիտ անունը Անունի տուփից:

Խնդրում ենք ստուգել դրանք, շնորհակալություն:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Սա փայլուն է: Շնորհակալություն, Քրիս Հ
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Հնարավո՞ր է օգտագործել համակցված տուփ կամ բացվող ընտրանք՝ ժամացույցը սկսելու և դադարեցնելու համար
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Bonjour, j'ai voulu intégrer ce chronomètre à une autre macro, déterminer le temps d'utilisation du fichier. La macro se lance mais bloque l'utilisation du fichier. Comment faire pour utiliser votre chronomètre en même temps que d'autres codes VBA?MerciHenry.
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ողջու՜յն! Շնորհակալություն դրա համար, ինչպես կարող եմ այն ​​պատրաստել, որպեսզի այն լրացնի ժամանակը հաջորդ բջիջներում, օրինակ. մեկնարկի/դադարեցման ժամանակ C2 բջիջի համար, այնուհետև այլ մեկնարկի/դադարի ժամանակ c3, c4, c5 բջիջների համար և այլն 
Առայժմ ոչ մի մեկնաբանություն չկա
Բեռնել More

Հետեւեք մեզ

Հեղինակային իրավունքի © 2009 - www.extendoffice.com. | Բոլոր իրավունքները պաշտպանված են. Powered by ExtendOffice. | | Կայքի քարտեզ
Microsoft- ը և Office- ի պատկերանշանը հանդիսանում են Microsoft Corporation- ի ապրանքային նշաններ կամ գրանցված ապրանքային նշաններ ԱՄՆ-ում և (կամ) այլ երկրներում:
Պաշտպանված է Sectigo SSL- ի կողմից