Jste zde: Úvodní stránka » excel » vba-teorie-zaklady » do-loop-excel-vba
Do ... Loop - Excel VBA
Opakuje příkazy, dokud platí nebo neplatí podmínka.
Úvodem trocha teorie
Konstrukce Do .. Loop opakuje příkazy, dokud je podmínka vyhodnocena jako True, nebo dokud podmínka není True.
Syntaxe 1
Do [{While | Until} podmínka]
[příkazy]
[Exit Do]
[příkazy]
Loop
Syntaxe 2
Do
[příkazy]
[Exit Do]
[příkazy]
Loop [{While | Until} podmínka]
- podmínka - Volitelné. Číselný výraz nebo řetězcový výraz, který je vyhodnocen jako True nebo False. Je-li podmínka Null, pak je vyhodnocena jako False.
- příkazy - Jeden nebo více příkazů, které jsou opakovány, dokud je nebo dokud není podmínka True.
Poznámky k Do ... Loop
Do smyčky Do ... Loop může být umístěn libovolný počet příkazů Exit Do. Tento příkaz umožňuje předčasné ukončení smyčky. Popis funkce Exit do popíšů v jiném článku.
Při použití ve vnořených příkazech Do .. Loop předá příkaz Exit Do řízení do nadřazeného cyklu.
Příklad Do...Loop
Příklad příkaz Do...Loop proběhne ve smyčce 10krát, nastaví hodnotu příznaku na False a pomocí příkazu Exit Do bude předčasně ukončen.
Do While Pocitadlo < 20 ' Vnitřní smyčka.
Pocitadlo = Pocitadlo + 1 ' Zvyš počítadlo.
If Pocitadlo = 10 Then ' Je-li podmínka True.
Test = False ' Nastav hodnotu příznaku na False.
Exit Do ' Opusť vnitřní smyčku.
End If
Loop
Příklad Do...Loop - ochrana
Do cyklů příkazu Do .. Loop je vhodné zabudovat ochtanu. Excel zaokrouhluje a budeme-li přičítat desetiná čísla může dojít k zycyklení. Například při přičítání čísla 0,00001 (100.000)neddostaneme hodnotu 1, ale 0,999999999... Kód se neukončí a bude pokračovat dále do nekonečna.
Závěrem
Další příklady a použití se pokusím popsat na základě požadavku v komentářích.
Článek byl aktualizován: 18.12.2011 11:16
Další články k tématu
- Deklarace konstant
- Proměnné
- Pole úvod
- Pole prakticky
- If, Then, ElseIf, Else - podmínky
- With ... End With
- Select Case
- For Next - Cykly
- Do ... Loop - právě čtete
- While ... Wend
- Exit
- Goto
- OnKey - monitorování a reakce na stisk kláves
Komentáře zatím nejsou
Můžete být prvními co zanechají smysluplný komentář.
Přidání nového komentáře
Za obsah komentářů neodpovídám, jelikož jsou komentáře publikovány ihned po jejich napsání čtenářem. Toto nemohu nijak ovlivnit. Přesto si vyhrazuji možnost jakýkoli neslušný komentář smazat bez udání důvodu.
Nejnovější článek
Z článku o
excel jsem jako poslední přidal či upravil článek
14.05.2012:
Kombinování funkcí - vzorců.
Nejčtenější článek
Excel
- Základy MS Excel
- menu Soubor
- Formát dat
- Vložit
- Grafy
- Vzorce (Funkce)
- Matice
- Data
- Revize (Nástroje)
- VBA Úvod a seznamy článků
- VBA Teorie základy
- VBA Buňky cell
- VBA Listy sheet
- VBA Práce se soubory
- VBA Formuláře (UserForm)
- VBA Grafy
- VBA Application
- VBA Pás karet, Menu
- VBA Triky
- VBA praktické příklady kódu
- Praktické příklady
- Finanční poradce
- Šablony - Templates
- Testy
- Ostatní
Google+
Novinky
Matematické rovnice (vzorce) - Word 2010
Excel: 14.05.2012:
Kombinování funkcí - vzorců
Access: 28.04.2012:
VBA - Jak spustit v MS Access
Power Point: 25.04.2012:
SmartArt - PowerPoint 2010
Outlook 26.04.2012:
Outlook 2010 - jak vypadá
Project: 05.04.2012:
Kalendář ukázka
OneNote: 17.10.2010:
OneNote 2010 – popis obrazovky
Office 30.04.2012:
Kde hledat odpovědi na dotazy o MS Office
Poděkování
Translate
Stránky o MS Office produktu společnosti Micosoft. Neslouží jako technická podpora.
| Email na autora: lasak@centrum.cz | Copyright © : Pavel a Danka 2006 - 2012 |
| Doporučuji: Advokátní kancelář Brno - Dana Lasáková |
821
Tento web zatím neprošel jazykovou korekturou. Beta verze redakčního systému.