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: 19.09.2020 11:07

Podpora - oceňte web a pozvěte mě na čokoládu

Pomohl vám článek? Vyřešili jste problém? Můžete mě podpořit zakoupení tabulky (samozdřejmě čokoládové), když kafe nepiji ;) Odkaz na zakoupení čokolády. Za veškerou podporu vám děkuji a samozdřejmě jí využiji do zdokonalování a rozšířování webu.

Případně přidejte odkaz na vaši oblíbenou sociální síť, případně využijste hashtag #JakNaExcel .

Poděkování

Děkuji za váš čas a doufám, že jste nalezli odpověď na svůj problém.

Vylepšení

Narazili jste v článku na nejasnost, chybu? Máte tip na vylepšení nebo doplnění článku? Budu rád pokud se zmínite v komentářích.


Pavel Lasák - autor webu

Pavel Lasák

Microsoft Office (Word, Excel, Google tabulky, PowerPoint) se věnuji od roku 2000 (od dubna roku 2004 na této doméně) - V roce 2017 jsem od Microsoft získal prestižní ocenění MVP (zatím 8x za sebou). Své vědomosti a zkušenosti dávám k dispozici i on-line ve videích pro SEDUO. Ve firmách školím a konzultuji, učím na MUNI. Tento web již tvořím přes 20 let (o Excel píší přes 25). Zdarma je zde přes 1.500 návodu, tipů a triků, včetně přes 350 různých šablon, sešitů a přes 70 taháků v pdf.

   Pavel Lasák LinkedIn Profil    Pavel Lasák twitter Profil





Sdílejte

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

Nové články


Reklama


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 - 2025 |