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

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

While ... Wend - Excel VBA

Videokurzy Excel

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

Vykonávat posloupnost příkazu dokud platí podmínka.

Úvodem

Vykonává posloupnost příkazů tak dlouho, dokud je zadaná podmínka True.

Syntaxe

While podmínka [příkazy] Wend
  • podmínka Povinné. Numerický výraz nebo řetězcový výraz, který je vyhodnocen jako True nebo False.
  • příkazy Volitelné. Jeden nebo více příkazů provedených, dokud je podmínka True.

Je-li podmínka True, jsou provedeny všechny příkazy až k Wend. Procedura se vrací zpět k příkazu While a podmínka je znovu zkontrolována. Jestliže je stále True, proces se opakuje. Není-li True, běh pokračuje příkazem uvedeným za Wend.

Cykly While...Wend mohou být vnořeny do libovolné úrovně. Každý Wend odpovídá naposledy uvedenému While.

Poznámky: Je-li podmínka Null, je vyhodnocena jako False.

Poznámka 2: Místo While...Wend lze použít příkaz Do...Loop, který umožňuje lepší a pružnější zpracování cyklů.

Příklad While...Wend

Počítadlo, které zvyšuje hodnotu na 40.

Dim Pocitadlo Pocitadlo = 0 ' Inicializuj proměnnou (na nulu). While Pocitadlo < 40 ' Testuj hodnotu počítadla. Pocitadlo = Pocitadlo + 1 ' Zvyš počítadlo o jedna. Wend ' Platí-li Pocitadlo > 39, ukonči smyčku While. MsgBox Pocitadlo ' Zapiš 40 do ladícího okna.

Případně lze použít Ověření pomocí Debug

Debug.Print Pocitadlo ' není vyskakovací okno

Závěrem

V kódech nejsou deklarace proměných, jelikož slouží jako ukázkový příklad.

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

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 zatím nejsou

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







Sdílejte

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

Nové články

25.03.2017:
ROUNDUP, ROUNDDOWN - zaokrouhlování

07.04.2017:
Řazení Excel - bug - problém

09.04.2017:
Podmínkové funkce Excel - bug - problém


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

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