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

With ... End With - Excel VBA

Ú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: 14.12.2011 21:27

---

---

Další články k tématu

• Deklarace konstant
• Proměnné
• Pole úvod
• Pole prakticky
• If, Then, ElseIf, Else - podmínky
• With ... End With - právě čtete
• Select Case
• For Next - Cykly
• Do ... Loop
• 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ář.

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

Nejčtenější článek