Šis straipsnis parodys, kaip naudoti su ir baigti VBA
„Excel“ suteikia mums galimybę išmokti VBA įrašant makrokomandas. Šios makrokomandos pažodžiui įrašo viską, ką darome ekrane, ir konvertuoja veiksmus į VBA kodą. Tada galime išanalizuoti šį kodą ir iš jo pasimokyti.
Kai įrašome makrokomandą į VBA, svarbiausia, kai keičiame langelių formatą, makrokomandos įraše dažniausiai nenaudos „With… End With Syntax“. Suprasti, ką tai reiškia ir kam jie naudojami, yra svarbi VBA dalis.
Makro įrašymas
Norėdami įrašyti makrokomandą „Excel“, Juostelė, pasirinkite Rodinys> Makrokomandos> Įrašyti makrokomandą.
ARBA
Kūrėjas> Įrašyti makrokomandą
Pastaba: jei nematote kūrėjo juostelės, turėsite ją įgalinti. Norėdami sužinoti, kaip tai padaryti, spustelėkite ČIA.
Įveskite makrokomandos pavadinimą ir spustelėkite Gerai.
Pažymėkite kai kuriuos langelius ir suformatuokite juos paryškintam, pakeiskite spalvą į raudoną ir pakeiskite šrifto dydį. Tada apatiniame kairiajame ekrano kampe spustelėkite Stabdyti, kad sustabdytumėte makrokomandos įrašymą.
SU teiginio sintaksė
Norėdami peržiūrėti / redaguoti įrašytą makrokomandą: juostelėje pasirinkite Rodinys> Makrokomandos> Žiūrėti makrokomandas. Pasirinkite ką tik įrašytą makrokomandą, tada spustelėkite Redaguoti.
ARBA
Juostelėje pasirinkite Kūrėjas> „Visual Basic“ perjungti į VBE langą.
Įrašyta makrokomanda gali atrodyti kaip žemiau pateiktas pavyzdys
| 123456789 | „Sub WithMacro“ ()Diapazonas („A2: C10“). PasirinkiteSelection.Font.Bold = TiesaPasirinkimas.Šriftas.Dydis = 12Su pasirinkimu. Šriftas.Spalva = -16776961.TintAndShade = 0Pabaiga suPabaiga Sub |
Pirmiausia pasirinkome diapazoną A2: C10.
Tada paryškinimą nustatėme į „true“, o šrifto dydį - į 12. Atminkite, kad šioms eilutėms kartojamas kodas „Selection.Font“.
Tada makrokomanda užfiksavo, kad keičiame teksto spalvą - atkreipkite dėmesį, kad šį kartą „Selection.Font“ yra SU priešais jį, o 2 savybės, kurios yra keičiamos (spalva ir atspalvis), turi tašką (.). Tada kodo sritis užbaigiama an PABAIGA SU.
Norėdami supaprastinti šį kodą, galime perkelti paryškintą ir dydį, kad jie būtų su WITH sakiniu, todėl nebereikės kartoti žodžio Pasirinkimas.
| 123456789 | „Sub WithMacro“ ()Diapazonas („A2: C10“). PasirinkiteSu pasirinkimu. Šriftas.Bold = tiesa.Dydis = 12.Spalva = -16776961.TintAndShade = 0Pabaiga suPabaiga Sub |
Todėl teiginio WITH … END WITH sintaksė yra labai paprasta:
| 123 | SU objektu“savybes, kurias reikia formatuoti/keistiPABAIGA SU |
Mes galėjome pakeisti kodą kitaip:
| 1234567 | Sub RemoveWith ()Diapazonas („A2: C10“). PasirinkiteSelection.Font.Bold = TiesaPasirinkimas.Šriftas.Dydis = 12Selection.Font.Color = -16776961Selection.Font.TintAndShade = 0Pabaiga Sub |
Pirmiau pateiktame pavyzdyje žodžius „Selection.Font“ pridėjome prie kiekvienos kodo eilutės. Todėl mes pakartotinai nurodėme kodą Selection.Font Object.
Tačiau sakinio WITH naudojimas reiškia, kad šį objektą turime nurodyti tik vieną kartą kode. Tai yra švaresnis kodavimo būdas - jis liepia VBA prasidėti WITH ir baigti END WITH - visas vykdomas kodas yra įtrauktas į tuos 2 žodžius. Tai leidžia makrokomandai veikti greičiau ir efektyviau (ypač ilgesnėms makrokomandoms) ir prideda jūsų kodo struktūrą.
