Můžeš přerušit makro v Vynikat kdykoli stisknutím klávesy Esc nebo Ctrl + Break.
Umístěte na list příkazové tlačítko a přidejte následující řádky kódu:
Dim x As Long
x = 5
Do While x> 2
x = x + 1
Smyčka
1. Klikněte na příkazové tlačítko na listu. Toto makro se nikdy nezastaví, protože část po 'Do While' bude vždy pravdivá (x bude vždy vyšší než 2).
2. Chcete -li tuto nekonečnou smyčku zastavit, stiskněte klávesu Esc nebo Ctrl + Break. Zobrazí se následující dialogové okno:
3. Makro ukončíte kliknutím na End, kliknutím na Debug se podíváte na makro v editoru jazyka.
4. Pokud nechcete, aby uživatelé vašeho programu mohli přerušit vaše makro, přidejte na začátek kódu následující řádek kódu (nedoporučuje se).
Application.EnableCancelKey = xlDisabled
5. Přestože Excel VBA resetuje vlastnost EnableCancelKey automaticky na xlInterrupt na konci vašeho makra, je dobrým zvykem (při použití předchozího řádku kódu) ukončit makro následujícím řádkem kódu:
Application.EnableCancelKey = xlInterrupt
Poznámka: Pokud Excel zamrzne a již nemůžete makro přerušit, stiskněte Ctrl + Alt + Odstranit a zavřete Excel.
