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

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

With ... End With - Excel VBA

Videokurzy Excel

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

Jak efektně vytvořit posloupnost příkazů pro jeden objekt.

Úvodem

Tato konstrukce Vykonává posloupnost příkazů pro jeden objekt nebo uživatelsky definovaný typ. Příkazy With zrychlují zpracovávání procedur a umožňují vyhnout se opakovaným příkazům.

With objekt [příkazy] End With

Doplnění: V bloku With se nemůže změnit objekt. Proto nelze použít jeden příkaz With pro změnu vlastností různých objektů.

Doporučení: Podle příruček se nedoporučuje odskakujte do nebo z bloků With. Jsou-li provedeny příkazy bez With nebo End With, mohou nastat chyby nebo nepředvídatelné chování celého programu.

Příklad with ... End With

Potřebujete změnit buňce hodnotu, písmo změnit na tučné a změni barvu písma na žlutou.

With Worksheets("List1").Range("A1") .Value = 30 .Font.Bold = True .Interior.Color = RGB(255, 255, 0) End With

Vnořování with ... End With

Příkazy se dají vnořovat. Což nám opět může ulehčit práci a zpřehlednit náš program.

With Workbooks("MujSešit").Worksheets("List1").Cells(1, 1) .Formula = "=SQRT(25)" With .Font .Name = "Arial" .Bold = True .Size = 8 End With End With

Závěrem

Pro další náměty jak funguje with ... End With jsou k dispozici komentáře.

Č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


Jenik

Přidáno: 09.04.13 09:58

Dobrý den, velmi rád se vzdělávám z vašich webových stránek, ale pořád nemohu naprogramovat makro, které by mi pomohlo při databázových operací. Mám přibližně něco kolem 60000 řádků ve sloupci E. Chtěl bych aplikovat vzorec MIN(E1;E115), MIN(E116;E284), MIN(E285;E453), který by se automaticky vypisoval třeba do sloupce "F" řádek po řádku a usnadnil mi práci abych nemusel vypisovat vzorec do každého řádku zvlášť. Děkuji za případnou pomoc.

Pavel Lasák

Přidáno: 01.08.15 20:34

To Jenik: Využít funkci POSUN a pro jednoduchost v dalším sloupi bych počítal okrajové podmínky E115, E248, ....







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

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