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

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



| tisk stránky TISK | nahoru NAHORU |
| |

Další články k tématu




Komentáře zatím nejsou

Můžete být prvními co zanechají smysluplný komentář.


Přidání nového komentáře




(vlož číslo šest)

Z bezpečnostních důvodu dočasně nemůžete použít HTML značky a URL. Děkuji za pochopení.
Děkuji, za Vaše 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




Google+

  

Facebook

facebook  

Novinky

Word: 12.5.2012:
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í

Poděkování patří hlavně mojí nejbáječnější manželce.

LinkedIN

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.