Ez az oktatóanyag számos igazán hasznos gyorsbillentyűt mutat be a VBA -ban
A VBE megnyitásához használja az Alt + F11 billentyűkombinációt
Általában a Visual Basic Editor megnyitásához kattintson az Excel szalag Visual Basic gombjára. Azonban megnyomhatja a gombot Alt + F11 helyette!
Gyorsbillentyűk a VBE -ben
Ctl+r- megmutatja a Project Explorer.
Ctl+g - megmutatja a Azonnali ablak.
F4 - megmutatja a Tulajdonságok ablak.
F2 - megmutatja a Objektum böngésző.
F5 - fut a Eljárás Benne vagy.
F8 - lehetővé teszi a kód beírását Szünet mód.
Makró rögzítése
A VBA elsajátításának egyik legjobb módja a makró rögzítése, majd a kód elemzése. Ez egy nagyon gyors módja a kódírásnak is, de a felvevő MINDEN billentyűleütést rögzít, ezért szükség lehet a kód szerkesztésére a felesleges sorok eltávolításához.
Vizsgáljuk meg a makró rögzítő által rögzített alábbi makrót, és nézzük meg, hogyan tehetjük hatékonyabbá.
| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152 | Sub TestFormat ()''TestFormat makró''Billentyűparancs: Ctrl+Shift+T'ActiveCell.FormulaR1C1 = "Alma"Tartomány ("D3"). Válassza kiActiveCell.FormulaR1C1 = "Körte"Tartomány ("E3"). Válassza kiActiveCell.FormulaR1C1 = "Őszibarack"Tartomány ("C4"). Válassza kiActiveCell.FormulaR1C1 = "12"Tartomány ("D4"). Válassza kiActiveCell.FormulaR1C1 = "14"Tartomány ("E4"). Válassza kiActiveCell.FormulaR1C1 = "16"Tartomány ("C5"). Válassza kiActiveCell.FormulaR1C1 = "20"Tartomány ("D5"). Válassza kiActiveCell.FormulaR1C1 = "25"Tartomány ("E5"). Válassza kiActiveCell.FormulaR1C1 = "26"Tartomány ("C6: E6"). Válassza kiTartomány ("E6"). AktiváljaKiválasztás.FormulaR1C1 = "= SUM (R [-2] C: R [-1] C)"Selection.Borders (xlDiagonalDown) .LineStyle = xlNoneSelection.Borders (xlDiagonalUp) .LineStyle = xlNoneSelection.Borders (xlEdgeLeft) .LineStyle = xlNoneSelection.Borders (xlEdgeTop) segítségével.LineStyle = xlFolytonos.ColorIndex = 0.TintAndShade = 0.Súly = xlVékonyVége ezzelSelection.Borders (xlEdgeBottom).LineStyle = xlDouble.ColorIndex = 0.TintAndShade = 0.Súly = xlVastagVége ezzelSelection.Borders (xlEdgeRight) .LineStyle = xlNoneSelection.Borders (xlInsideVertical) .LineStyle = xlNoneSelection.Borders (xlInsideHorizontal) .LineStyle = xlNoneTartomány ("C4: E6"). Válassza kiSelection.NumberFormat = _"_- [$$-hu-US]*#, ## 0.00_; _- [$$-en-US]*-#, ## 0.00; _- [$$-hu-US]*" " -"" ?? _; _-@_ "Tartomány ("C3: E3"). Válassza kiSelection.Font.Bold = IgazTartomány ("C3"). Válassza kiActiveCell.FormulaR1C1 = "Alma"End Sub |
Most nézze meg az alábbi kódot, amely ugyanazt az eredményt fogja elérni
| 123456789101112131415161718192021 | Sub TestFormat ()'Billentyűparancs: Ctrl+Shift+TTartomány ("C3") = "Alma"Tartomány ("D3") = "Körte"Tartomány ("E3") = "Őszibarack"Tartomány ("C4") = 12Tartomány ("D4") = 14Tartomány ("C4") = 16Tartomány ("C5") = 20Tartomány ("D5") = 25Tartomány ("E5") = "26"Tartomány ("C6: E6"). Válassza kiKiválasztás.FormulaR1C1 = "= SUM (R [-2] C: R [-1] C)"Selection.Borders (xlEdgeTop) .LineStyle = xlContinuousSelection.Borders (xlEdgeBottom) .LineStyle = xlDoubleTartomány ("C4: E6"). Válassza kiSelection.NumberFormat = _"_- [$$-hu-US]*#, ## 0.00_; _- [$$-en-US]*-#, ## 0.00; _- [$$-hu-US]*" " -"" ?? _; _-@_ "Tartomány ("C3: E3"). Válassza kiSelection.Font.Bold = IgazEnd Sub |
Ha sok redundáns kódot kivágunk, és ahol lehetséges, módosítjuk a rögzített kódot, sokkal hatékonyabbá és könnyebben olvashatóvá tehetjük a makrót.
A Személyes makró munkafüzet használata
Ha azt szeretné, hogy egy makrót az összes Excel -fájlban használhasson, tárolja a makrót a Személyes makró munkafüzetben - ez a munkafüzet rejtve van, és mindig nyitva van az Excelben, így az ott tárolt makrók, globális makrók .
Ha nem lát személyes makró munkafüzetet a VBE ablakban, rögzítsen egy makrót, és adja meg, hogy a személyes makró munkafüzetben tárolja -e.
Behúzó kód
Amikor behúzza a kódot, azonnal megkönnyíti az olvasást és más követheti. Több kódsor behúzásához válassza ki őket, és nyomja meg a Tab billentyűt.
Hasonlóképpen, a kód felülírásához nyomja meg a gombot Shift+Tab és a kód ismét balra fog mozogni.
Unod már a VBA kódpéldák keresését? Próbálja ki az AutoMacro -t!
Hozzászólási kód
Megjegyzések hozzáadása a kódhoz egy másik módja annak, hogy megkönnyítse az olvasást és a navigálást. Megjegyzést adhat a kódhoz úgy, hogy egyetlen idézőjelet tesz a sor elejére, ahogy az alább látható.
Írás kisbetűvel
A VBA a megfelelő esetet használja a kódban. Ha kisbetűvel ír, és nem változik a megfelelő kisbetűre, akkor gyorsan láthatja, hogy hol hibázott.
Az Intellisense használata
Az Intellisense felbukkan, amikor kódot ír, és felsorolja az összes tulajdonságot, módszert és eseményt, amelyek elérhetők az objektummal, amellyel dolgozik. Általában automatikusan megjelenik, miután beírt egy pontot, amikor begépeli a kódot.
A megnyomásával kényszerítheti megjelenítésére is Ctl+j.
Hasonlóképpen, ha argumentumokat felvevő függvényeket használ az Excelben, ezek általában automatikusan felbukkannak.
A megnyomásával kényszerítheti őket a megjelenésre Ctl+i.
Automatikus kitöltés
Használhatja a Ctl+szóköz billentyűkombináció az automatikus kiegészítés használatához a kód írásakor.
A fenti példában az összes Tulajdonságok, módszerek, események és Változók kezdve str megjelenik a listában, amelyből választhat.
Opció Explicit és fordító kód
Ha az összes modul tetején szerepel az Option Explicit, akkor minden változó deklarálva van, és megakadályozza, hogy helyesírási hibákat kövessen el a változók nevében. Ha be van kapcsolva az Explicit Option, és lefordítja vagy futtatja a kódot, akkor hibaüzenetet kap, ha a változó nevét nem ismeri fel.
Azonnali ablak és hibakeresés
Azonnali ablak (a gombbal kapcsolhatja be Ctl+g) lehetővé teszi a kód hibakeresését és a változók értékének megkeresését, miközben ebben a hibakeresési módban van.
| 12345678 | Alvizsgálati változók'deklarálja a változótDim strName mint karakterlánc'töltse ki a változótstrName = "Anne Smith"'az F8 billentyűvel lépjen át a kódon, és küldje el a változó értékét a debug.print használatával a közvetlen ablakbaHibakeresés. StrName nyomtatásaVége al |
