Tento tutoriál vám ukáže řadu opravdu užitečných zkratek ve VBA
Pomocí Alt + F11 otevřete VBE
K editoru jazyka se obvykle dostanete tak, že kliknete na tlačítko jazyka na pásu karet aplikace Excel. Můžete však stisknout Alt + F11 namísto!
Rychlé klávesy ve VBE
Ctl+r- ukazuje Průzkumník projektů.
Ctl+g - ukazuje Okamžité okno.
F4 - ukazuje Okno vlastností.
F2 - ukazuje Prohlížeč objektů.
F5 - běží Postup jsi v.
F8 - umožňuje procházet kódem Přestávka režimu.
Záznam makra
Jedním z nejlepších způsobů, jak se naučit VBA, je zaznamenat makro a poté analyzovat kód. Je to také velmi rychlý způsob psaní kódu, ale rekordér zaznamená KAŽDÝ stisk klávesy, takže bude možná nutné upravit kód, abyste odstranili nadbytečné řádky.
Podívejme se na níže uvedené makro zaznamenané záznamníkem makra a uvidíme, jak jej můžeme zefektivnit.
| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152 | Dílčí testovací formát ()'„Makro TestFormat''Klávesová zkratka: Ctrl+Shift+T'ActiveCell.FormulaR1C1 = "Applese"Rozsah („D3“). VyberteActiveCell.FormulaR1C1 = "Hrušky"Rozsah („E3“). VyberteActiveCell.FormulaR1C1 = "Broskve"Rozsah („C4“). VyberteActiveCell.FormulaR1C1 = "12"Rozsah („D4“). VyberteActiveCell.FormulaR1C1 = "14"Rozsah („E4“). VyberteActiveCell.FormulaR1C1 = "16"Rozsah („C5“). VyberteActiveCell.FormulaR1C1 = "20"Rozsah („D5“). VyberteActiveCell.FormulaR1C1 = "25"Rozsah („E5“). VyberteActiveCell.FormulaR1C1 = "26"Rozsah („C6: E6“). VyberteRozsah („E6“). AktivujteSelection.FormulaR1C1 = "= SUM (R [-2] C: R [-1] C)"Selection.Borders (xlDiagonalDown) .LineStyle = xlNoneSelection.Borders (xlDiagonalUp) .LineStyle = xlNoneSelection.Borders (xlEdgeLeft) .LineStyle = xlNoneWith Selection.Borders (xlEdgeTop).LineStyle = xlSpojité.ColorIndex = 0.TintAndShade = 0.Hmotnost = xlThinKonec sWith Selection.Borders (xlEdgeBottom).LineStyle = xlDouble.ColorIndex = 0.TintAndShade = 0.Weight = xlThickKonec sSelection.Borders (xlEdgeRight) .LineStyle = xlŽádnéSelection.Borders (xlInsideVertical) .LineStyle = xlNoneSelection.Borders (xlInsideHorizontal) .LineStyle = xlNoneRozsah („C4: E6“). VyberteSelection.NumberFormat = _"_- [$$-en-US]*#, ## 0,00_; _- [$$-en-US]*-#, ## 0,00; _- [$$-en-US]*" " -"" ?? _; _-@_ "Rozsah („C3: E3“). VyberteSelection.Font.Bold = TrueRozsah („C3“). VyberteActiveCell.FormulaR1C1 = "Jablka"End Sub |
Nyní se podívejte na níže uvedený kód, který dosáhne stejného výsledku
| 123456789101112131415161718192021 | Dílčí testovací formát ()'Klávesová zkratka: Ctrl+Shift+TRozsah ("C3") = "Jablka"Rozsah ("D3") = "Hrušky"Rozsah ("E3") = "Broskve"Rozsah („C4“) = 12Rozsah ("D4") = 14Rozsah („C4“) = 16Rozsah ("C5") = 20Rozsah ("D5") = 25Rozsah ("E5") = "26"Rozsah („C6: E6“). VyberteSelection.FormulaR1C1 = "= SUM (R [-2] C: R [-1] C)"Selection.Borders (xlEdgeTop) .LineStyle = xlContinuousSelection.Borders (xlEdgeBottom) .LineStyle = xlDoubleRozsah („C4: E6“). VyberteSelection.NumberFormat = _"_- [$$-en-US]*#, ## 0,00_; _- [$$-en-US]*-#, ## 0,00; _- [$$-en-US]*" " -"" ?? _; _-@_ "Rozsah („C3: E3“). VyberteSelection.Font.Bold = TrueEnd Sub |
Vyjmutím velkého množství nadbytečného kódu a úpravou zaznamenaného kódu, kde je to možné, můžeme makro učinit mnohem efektivnějším a snadno čitelným.
Pomocí sešitu Personal Macro
Pokud chcete, aby bylo možné makro použít ve všech souborech aplikace Excel, můžete ho uložit do osobního sešitu maker - tento sešit je skrytý a je v aplikaci Excel otevřený po celou dobu, takže v něm lze ukládat všechna makra, globální makra .
Pokud v okně VBE nevidíte osobní sešit maker, zaznamenejte makro a určete, aby bylo uloženo do sešitu osobního makra.
Odsazovací kód
Když odsadíte kód, okamžitě usnadníte jeho čtení a budete ho moci sledovat i pro někoho jiného. Chcete -li odsadit více řádků kódu, můžete je vybrat a stisknout klávesu Tab.
Podobně, chcete -li kód zvětšit, stiskněte Shift+Tab a kód se znovu přesune doleva.
Už vás nebaví hledat příklady kódu VBA? Zkuste AutoMacro!
Kód komentáře
Přidávání komentářů do kódu je další způsob, jak usnadnit čtení a navigaci. Komentář ke kódu přidáte vložením jednoduché uvozovky na začátek řádku, jak je uvedeno níže.
Psaní malými písmeny
VBA používá v kódu správný případ. Pokud píšete malými písmeny a nezmění se na Správná velká písmena, můžete rychle zjistit, kde jste udělali chybu.
Použití Intellisense
Intellisense se objeví při psaní kódu a poskytne vám seznam všech vlastností, metod a událostí, které jsou k dispozici pro objekt, se kterým pracujete. Obvykle se objeví automaticky po zadání tečky při psaní kódu.
Můžete také vynutit, aby se zobrazil stisknutím Ctl+j.
Podobně, když používáte funkce v Excelu, které přebírají argumenty, tyto se automaticky objeví automaticky.
Stisknutím tlačítka je můžete přinutit, aby se objevily Ctl+i.
Automatické dokončování
Můžete použít Ctl+mezerník kombinace kláves pro použití automatického dokončování při psaní kódu.
Ve výše uvedeném příkladu jsou všechny Vlastnosti, metody, události a Proměnné počínaje str se zobrazí v seznamu, ze kterého si můžete vybrat.
Možnost explicitní a kompilační kód
Zajištění toho, že máte v horní části všech modulů možnost Explicit, zajistí, že všechny vaše proměnné budou deklarovány, a zabráníte chybám s pravopisem v názvech proměnných. Pokud máte zapnutou možnost Explicit a zkompilujete nebo spustíte kód, zobrazí se chyba, pokud název proměnné není rozpoznán.
Okamžité okno a ladění
Okamžité okno (můžete jej zapnout pomocí Ctl+g) umožňuje ladit kód a najít hodnotu proměnných, když jste v tomto režimu ladění.)
| 12345678 | Dílčí testovací proměnné'deklarujte proměnnouDim strName jako řetězec'naplňte proměnnoustrName = "Anne Smith"'pomocí F8 procházejte kódem a odešlete hodnotu proměnné pomocí debug.print do bezprostředního oknaDebug.Print strNameKonec sub |
