Ինչպե՞ս Excel- ում ամեն X րոպեն մեկ կրկնել կամ պտտվել մակրո:

Microsoft Excel- ի հետ աշխատելիս կարող է անհրաժեշտ լինել ստեղծել մակրոներ ՝ որոշ գործառնությունների հասնելու համար: Օրինակ, դուք ցանկանում եք ստեղծել մակրո, որպեսզի տվյալների մի շարք ավտոմատ կերպով պատճենեք նոր վայր: Քանի որ տվյալները հաճախակի կփոխվեն, ձեզ հարկավոր է այս մակրո-ն ավտոմատ կերպով գործարկել յուրաքանչյուր 5 րոպեն մեկ ՝ առանց ձեռքով այն հրահրելու, որպեսզի տվյալների այս երկու տիրույթները համաժամացվեն: Ինչպե՞ս հասնել դրան: Այս հոդվածի մեթոդը կարող է օգնել ձեզ:

Կրկնեք կամ պտտեք մակրո յուրաքանչյուր X րոպեի ընթացքում Excel- ում

Կրկնեք կամ պտտեք մակրո յուրաքանչյուր X րոպեի ընթացքում Excel- ում

Հետևյալ VBA կոդը կարող է օգնել Excel- ում յուրաքանչյուր X րոպեն մեկ մակրո կրկնել: Խնդրում եմ արեք հետևյալ կերպ.

1. Մամուլ ալտ + F11 ստեղները միաժամանակ բացել Microsoft Visual Basic հավելվածների համար պատուհան.

2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ, Դրանից հետո պատճենեք և տեղադրեք ներքևում նշված VBA կոդը ՝ Կոդ պատուհան Տեսեք,

VBA կոդ. Կրկնեք կամ պտտեք մակրո յուրաքանչյուր X րոպե Excel- ում

Sub ReRunMacro()
Dim xMin As String

'Insert your code here
    xMin = GetSetting(AppName:="Kutools", Section:="Macro", Key:="min", Default:="")
    If xMin = "Exit" Then
    SaveSetting "Kutools", "Macro", "min", "False"
    Exit Sub
    End If
    If (xMin = "") Or (xMin = "False") Then
      xMin = Application.InputBox(prompt:="Please input the interval time you need to repeat the Macro", Title:="Kutools for Excel", Type:=2)
      SaveSetting "Kutools", "Macro", "min", xMin
    End If
    If (xMin <> "") And (xMin <> "False") Then
      Application.OnTime Now() + TimeValue("0:" + xMin + ":0"), "ReRunMacro"
    Else
      Exit Sub
    End If
End Sub

ՆշումԿոդում խնդրում ենք փոխարինել այս տողը «Տեղադրեք ձեր կոդը այստեղ ծածկագրով, որը դուք կգործարկեք յուրաքանչյուր X րոպեն:

3. Սեղմեք F5 ծածկագիրը գործելու համար: Պատուհանման մեջ Excel- ի համար նախատեսված գործիքներ երկխոսության տուփ, խնդրում ենք մուտքագրել միջակայքի ժամանակը, որի հիման վրա կկրկնեք մակրոը, ապա կտտացրեք այն OK կոճակ Տեսեք,

Այսուհետ, որոշակի Macro- ն անընդհատ գործելու է յուրաքանչյուր 5 րոպեն մեկ ձեր աշխատանքային գրքում:

ՆշումԵթե ​​Ձեզ անհրաժեշտ է դադարեցնել մակրոի կատարումը և փոխել ցիկլի միջակայքը, խնդրում ենք պատճենել ստորև ներկայացված VBA կոդը նույնի մեջ Մոդուլներ պատուհանը և սեղմել կոճակը F5 ծածկագիրը գործելու համար: Այնուհետև մակրոը կդադարեցվի, խնդրում ենք վերամշակել վերոնշյալ կոդը ՝ նոր ընդմիջում նշելու համար:

VBA կոդ. Դադարեցնել մակրոի կատարումը

Sub ExitReRunMacro()
SaveSetting "Kutools", "Macro", "min", "Exit"
End Sub

Առնչվող հոդվածներ:

• Ինչպե՞ս կրկնել տողերը Excel- ում աշխատանքային թերթիկը ոլորելիս:
• Ինչպե՞ս կրկնել վերջին կամ նախորդ գործողությունները Excel- ում:
• Ինչպե՞ս տպել անընդմեջ շարքերը Excel- ի յուրաքանչյուր տպագիր էջի ներքևում:
• Ինչպե՞ս կրկնել բջիջի արժեքը, մինչև Excel- ում նոր արժեք տեսնեն կամ հասնեն:

---

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

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

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

Կարդալ ավելին... Անվճար ներբեռնում... Գնեք ... 

---

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

• Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
• Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
• Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:

Կարդալ ավելին... Անվճար ներբեռնում... Գնեք ...