Šī apmācība parādīs dažādus patiešām noderīgus īsceļus VBA
Lai atvērtu VBE, izmantojiet Alt + F11
Parasti, lai atvērtu Visual Basic redaktoru, Excel lentē ir jānoklikšķina uz pogas Visual Basic. Tomēr jūs varat nospiest Alt + F11 tā vietā!
Ātrie taustiņi VBE
Ctl+r- parāda Projektu pētnieks.
Ctl+g - parāda Tūlītējs logs.
F4 - parāda Rekvizītu logs.
F2 - parāda Objektu pārlūks.
F5 - vada Procedūra tu esi iekšā.
F8 - ļauj jums ievadīt kodu Pārtraukums režīmu.
Makro ierakstīšana
Viens no labākajiem veidiem, kā apgūt VBA, ir makro ierakstīšana un pēc tam koda analīze. Tas ir arī ļoti ātrs koda rakstīšanas veids, taču diktofons ierakstīs KATRU taustiņsitienu, tāpēc jums, iespējams, būs jārediģē kods, lai noņemtu liekās līnijas.
Apskatīsim makro ierakstītāja ierakstīto makro un redzēsim, kā to padarīt efektīvāku.
12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152 | Apakšformāta formāts ()''TestFormat makro'Tastatūras saīsne: Ctrl+Shift+T'ActiveCell.FormulaR1C1 = "Āboli"Diapazons ("D3"). IzvēlietiesActiveCell.FormulaR1C1 = "Bumbieri"Diapazons ("E3"). IzvēlietiesActiveCell.FormulaR1C1 = "Persiki"Diapazons ("C4"). AtlasietActiveCell.FormulaR1C1 = "12"Diapazons ("D4"). IzvēlietiesActiveCell.FormulaR1C1 = "14"Diapazons ("E4"). IzvēlietiesActiveCell.FormulaR1C1 = "16"Diapazons ("C5"). AtlasietActiveCell.FormulaR1C1 = "20"Diapazons ("D5"). IzvēlietiesActiveCell.FormulaR1C1 = "25"Diapazons ("E5"). IzvēlietiesActiveCell.FormulaR1C1 = "26"Diapazons ("C6: E6"). AtlasietDiapazons ("E6"). AktivizētAtlase. FormulaR1C1 = "= SUM (R [-2] C: R [-1] C)"Selection.Borders (xlDiagonalDown) .LineStyle = xlNoneSelection.Borders (xlDiagonalUp) .LineStyle = xlNoneSelection.Borders (xlEdgeLeft) .LineStyle = xlNoneAr Selection.Borders (xlEdgeTop).LineStyle = xlContinuous.ColorIndex = 0.TintAndShade = 0.Svars = xlThinBeigt arAr Selection.Borders (xlEdgeBottom).LineStyle = xlDouble.ColorIndex = 0.TintAndShade = 0.Svars = xlBiezsBeigt arSelection.Borders (xlEdgeRight) .LineStyle = xlNoneSelection.Borders (xlInsideVertical) .LineStyle = xlNoneSelection.Borders (xlInsideHorizontal) .LineStyle = xlNoneDiapazons ("C4: E6"). AtlasietSelection.NumberFormat = _"_- [$$-lv-ASV]*#, ## 0.00_; _- [$$-lv-ASV]*-#, ## 0.00; _- [$$-lv-ASV]*" " -"" ?? _; _-@_ "Diapazons ("C3: E3"). AtlasietSelection.Font.Bold = PatiesaDiapazons ("C3"). AtlasietActiveCell.FormulaR1C1 = "Āboli"Beigu apakš |
Tagad apskatiet zemāk esošo kodu, kas sasniegs tādu pašu rezultātu
123456789101112131415161718192021 | Apakšformāta formāts ()Tastatūras saīsne: Ctrl+Shift+TDiapazons ("C3") = "Āboli"Diapazons ("D3") = "Bumbieri"Diapazons ("E3") = "Persiki"Diapazons ("C4") = 12Diapazons ("D4") = 14Diapazons ("C4") = 16Diapazons ("C5") = 20Diapazons ("D5") = 25Diapazons ("E5") = "26"Diapazons ("C6: E6"). AtlasietAtlase. FormulaR1C1 = "= SUM (R [-2] C: R [-1] C)"Selection.Borders (xlEdgeTop) .LineStyle = xlContinuousSelection.Borders (xlEdgeBottom) .LineStyle = xlDoubleDiapazons ("C4: E6"). AtlasietSelection.NumberFormat = _"_- [$$-lv-ASV]*#, ## 0.00_; _- [$$-lv-ASV]*-#, ## 0.00; _- [$$-lv-ASV]*" " -"" ?? _; _-@_ "Diapazons ("C3: E3"). AtlasietSelection.Font.Bold = PatiesaBeigu apakš |
Izgriežot daudz lieku kodu un, ja iespējams, mainot ierakstīto kodu, mēs varam padarīt makro daudz efektīvāku un vieglāk lasāmu.
Personīgās makro darbgrāmatas izmantošana
Ja vēlaties, lai makro varētu izmantot visos jūsu Excel failos, varat to saglabāt darbgrāmatā Personal Macro - šī darbgrāmata ir paslēpta un ir atvērta visu laiku programmā Excel, padarot visus tajā saglabātos makro, globālos makro. .
Ja VBE logā neredzat personīgo makro darbgrāmatu, ierakstiet makro un norādiet, lai tas tiktu saglabāts personīgās makro darbgrāmatā.
Atkāpes kods
Ievadot koda atkāpi, jūs uzreiz atvieglojat lasīšanu un kāds cits var sekot. Lai ievilktu vairākas koda rindas, varat tās atlasīt un nospiest taustiņu Tab.
Līdzīgi, lai pārsniegtu kodu, nospiediet Shift+Tab un kods atkal pārvietosies pa kreisi.
Vai esat noguris no VBA koda piemēru meklēšanas? Izmēģiniet AutoMacro!
Komentēšanas kods
Komentāru pievienošana kodam ir vēl viens veids, kā atvieglot lasīšanu un navigāciju. Jūs pievienojat kodam komentāru, rindas sākumā ievietojot vienu pēdiņu, kā parādīts zemāk.
Rakstīšana ar mazajiem burtiem
VBA kodā izmanto pareizo lietu. Ja rakstāt ar mazajiem burtiem un tas nemainās uz pareizo burtu, varat ātri redzēt, kur esat pieļāvis kļūdu.
Izmantojot Intellisense
Intellisense tiek parādīts, kad rakstāt kodu, un sniedz sarakstu ar visiem rekvizītiem, metodēm un notikumiem, kas ir pieejami objektam, ar kuru strādājat. Parasti tas parādās automātiski pēc koda ievadīšanas, kad esat ievadījis punktu.
Varat arī piespiest to parādīt, nospiežot Ctl+j.
Līdzīgi, ja programmā Excel izmantojat funkcijas, kurās tiek ņemti vērā argumenti, tās parasti tiek parādītas automātiski.
Jūs varat piespiest viņus parādīties, nospiežot Ctl+i.
Automātiski pabeigta
Jūs varat izmantot Ctl+atstarpes taustiņu kombinācija, lai rakstītu kodu izmantotu automātisko pabeigšanu.
Iepriekš minētajā piemērā visi Īpašības, metodes, notikumi un Mainīgie sākot ar str parādīsies sarakstā, no kura izvēlēties.
Opcija Skaidrs un apkopojošs kods
Pārliecinoties, ka visu moduļu augšpusē ir opcija Explicit, tiek nodrošināts, ka visi mainīgie ir deklarēti, un neļauj pieļaut pareizrakstības kļūdas mainīgo nosaukumos. Ja opcija Explicit ir ieslēgta un jūs apkopojat vai palaižat savu kodu, parādīsies kļūda, ja mainīgā nosaukums netiks atpazīts.
Tūlītējais logs un atkļūdošana
Tūlītējais logs (varat to ieslēgt, izmantojot Ctl+g) ļauj atkļūdot kodu un atrast mainīgo vērtību, kamēr esat šajā atkļūdošanas režīmā.
12345678 | Apakšpārbaudes mainīgie'deklarēt mainīgoDim strName kā virkne'aizpildiet mainīgostrName = "Anne Smits""Izmantojiet F8, lai izietu cauri kodam un nosūtītu mainīgā vērtību, izmantojot debug.print, uz tūlītējo loguAtkļūdot. Drukāt strNameBeigu apakš |