Prekinite makronaredbu u Excelu - jednostavan Excel VBA

Sadržaj

Možeš prekinuti makronaredbu u Excel u bilo kojem trenutku pritiskom na Esc ili Ctrl + Break.

Postavite naredbeni gumb na radni list i dodajte sljedeće retke koda:

Dim x As Long
x = 5
Učinite Dok je x> 2
x = x + 1
Petlja

1. Pritisnite gumb naredbe na listu. Ova makronaredba nikada ne prestaje jer će dio nakon 'Do While' uvijek biti istinit (x će uvijek biti veći od 2).

2. Da biste zaustavili ovu beskonačnu petlju, pritisnite Esc ili Ctrl + Break. Pojavit će se sljedeći dijaloški okvir:

3. Pritisnite Kraj za završetak makronaredbe, kliknite Otklanjanje pogrešaka da biste pogledali makronaredbu u uređivaču Visual Basic.

4. Dodajte sljedeći kodni redak na početak koda ako ne želite da korisnici vašeg programa mogu prekinuti vašu makronaredbu (ne preporučuje se).

Application.EnableCancelKey = xlDisabled

5. Iako Excel VBA automatski poništava svojstvo EnableCancelKey na xlInterrupt na kraju makronaredbe, dobra je praksa (kada koristite prethodni kodni redak) da makro završite sljedećim kodnim retkom:

Application.EnableCancelKey = xlInterrupt

Napomena: ako se Excel zamrzne i više ne možete prekinuti makro, pritisnite Ctrl + Alt + Delete i zatvorite Excel.

Vi ćete pomoći u razvoju web stranice, dijeljenje stranicu sa svojim prijateljima

wave wave wave wave wave