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

Nový videokurz na Seduo: Excel pro začátečníky

     

Jste zde: Úvodní stránka » excel » vba-application » status-bar-vba-excel
Microsoft Excel logo

Status bar - VBA Excel


Jak důležité informace zobrazit v stavovém řádku (Status Bar).

Microsoft Excel logo

Úvodem

Chcete-li využít pro zobrazení stavu probíhajících operací (výpočtu) stavový řádek. Například při delší zpracování je vhodné zobrazit uživateli kolik procent je hotovo. Může si v průběhu zpracování zajít na kafe ;) Případně můžete zobrazovat i jiné údaje (počet žlutých políček ve výběru, atd.

Použijeme Application.StatusBar


Zobrazit prostý text

Úkolem je zobrazit text: Web: www.JakNaExcel.cz je nejlepší ;)

Application.StatusBar = "Web: www.JakNaExcel.cz je nejlepší ;)"

Smazat informace ze StatusBar

Budete-li chtít svou informaci ze stavového řádku vymazat.

Application.StatusBar = False

Kolik procent je hotovo

Ukázkový příklad, který ve stavovém řádku bude informovat o procentním splnění úkolů. VBA skript bude vyplňovat 10 políček náhodnými čísly. Pro přehlednost je v kódu časové zpoždění 1 sekunda za každým zapsaným číslem.

StatusBar Excel
Dim i As Integer, j As Integer Dim ProcentHotovo As Integer For i = 1 To 10 For j = 1 To 10 Cells(i, j).Value = WorksheetFunction.RandBetween(20, 100) ProcentHotovo = ((i - 1) * 10) + j Application.StatusBar = "Tvorba dat z " & ProcentHotovo & "% kompletní." Application.Wait Now + TimeValue("00:00:01") 'zpoždění 1 sec 'Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) 'Sleep 50 ' zpoždění Next j Next i Application.StatusBar = False

Poznámka: Ukončení ESC

Závěrem

Využíváte pro zobrazování informací stavový řádek? Nebo řešíte jinak?

Článek byl aktualizován: 22.02.2015 11:01

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


Petr Pecháček

Přidáno: 28.02.15 11:31

Právě mi v pozadí běží kód VBA, který stavového řádku využívá k zobrazení průběhu. Jinak se do něj cpou tzv. ProgressBary, ať už pravé (API), nebo falešné (obrázkové fonty). Nicméně v delších kódech bývá ScreenUpdating=False, který, byť ne výrazně, ale přeci jen, zobrazení ovlivňuje. Větší "frajeřina" je nechat si informace zobrazovat v bublině vpravo v systémové liště Windows (API).


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

Poznámka: Z časových důvodu není v mých sílách zodpovědět všechny dotazy. Děkuji za pochopení.




(vlož číslo padesátpět)

Z bezpečnostních důvodu dočasně nemůžete použít HTML značky, kromě <code> a </code> (pro vkládání VBA kódu). 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. V komentářích si tykáme. ;-)






Sdílejte

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

Nové články


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 - 2016 | 2909

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