Přeskočit navigaci | Přeskočit na novinky
     

Jste zde: Úvodní stránka » excel » vba-teorie-zaklady » excel-vba-goto

GOTO - VBA Excel

Videokurzy Excel

Ve spolupráci se SEDUO jsem vytvořil několik videokurzů:

skoky v programu VBA

GOTO

Bezpodmínečný odskok na zadaný řádek procedury. Použít lze jen k odskoku na řádky pouze v rámci procedury, kde se příkaz nachází.

GoTo řádka

řádka - Argument řádka může označovat návěští řádky nebo číslo řádky.

Příkaz GoTo - doporučení

Poznámka: Příliš mnoho příkazů GoTo může způsobí, že kód programu stane nepřehledný a neladitelný. Lepší je používat příkazy, Do...Loop, For...Next, If...Then...Else, Select Case.

Příklad na GOTO

použit z nápovědy k programu MS Excel:

Sub UkazkaPrikazuGoto()
Dim Cislo, MujRetezec
    Cislo = 1 ' Inicializuj proměnnou.
    ' Vyhodnoť Cislo a pro větvení vyber příslušné návěstí.
    If Cislo = 1 Then
       GoTo Radek1
    Else
    GoTo Radek2
 
Radek1:
    MujRetezec = "Číslo se rovná 1"
    GoTo PosledniRadek ' Jdi na PosledniRadek.

Radek2:
    ' Následující příkaz se nikdy neprovede.
    MujRetezec = "Číslo se rovná 2"

PosledniRadek:
    Debug.Print MujRetezec ' Vypíše "Číslo se rovná 1"
       ' do ladícího okna.

End Sub

Kurz VBA on-line

Tento článek je součástí on-line výukového kurzu VBA MS Excel.

Článek byl aktualizován: 01.11.2014 14:37

Odměna

Ušetřil vám tento web čas, peníze? Pomohl vyřešit problém? Jste ochotni poskytnout symbolickou odměnu na další rozvoj? Vybrte si formu odměny, která vám vyhovuje.


Pavel Lasák

Pavel Lasák - autor webu

Microsoft Office (Word, Excel, PowerPoint) se věnuji od roku 2006. Své vědomosti a zkušenosti dávám k dispozici na různých školeních a konzultacích, ale také na tomto webu. K dispozici na tomto webu je mnoho návodu, tipů a triků včetně desítek různých šablon.

   Pavel Lasák LinkedIn Profil    Pavel Lasák Google+ Profil    Pavel Lasák facebook Profil    Pavel Lasák twitter Profil

Doporučte tento článek přátelům

Pokud vám článek pomohl, případně si myslíte, že může pomoci i někomu dalšímu, budu rád když jej sdílením doporučíte přátelům - děkuji:



Komentáře


Marcel

Přidáno: 05.01.15 09:24

prosím o radu při pokusu o spuštění mi hlásí : Compile error: Block If without End If co s tím?

Martin

Přidáno: 16.07.15 10:17

Napiš na konec bloku s if prave to end if

Adam

Přidáno: 07.12.16 20:43

Kdyz promenna 'Cislo' neni 1 tak se by se melo vypsat : 'Cislo se nerovna 1', ne 'Cislo se rovna 2'.(Nemuzeme vedet zda je promenna 'Cislo' opravdu 2, bylo by potreba pridat dalsi if).







Sdílejte

Pomohl Vám návod?
Sdílejte na Facebooku, G+
LinkedIn...

Nové články


Newsletter

Přihlaste se odběru novinek a získejte:
Ebook zdarma -
10 kroků ke zvládnutí (Word, Excel, PowerPoint)
Šipka Kniha 3D Více o ebooku ...

TOPlist Licence Creative Commons webarchiv rss XML

Stránky o MS Office (Excel) produktu společnosti Microsoft. Neslouží jako technická podpora.
| Email na autora: pavel.lasak@gmail.com | Copyright © : Pavel Lasák 2004 - 2017 | 15442

Tento web zatím neprošel jazykovou korekturou. Beta verze redakčního systému.