Exceli VBA objektid viitavad üksikutele üksustele, mis koosnevad koodist ja andmetest. Exceli rakendus ise on objekt, nagu ka töövihikud, töölehed, lahtrivahemikud ja kujundid. Igal objektil on seotud omadused ja meetodid. Objektid võivad sisaldada ka teisi objekte ja kogude objekti kasutatakse samade Exceli objektide rühmale viitamiseks.
Selles õpetuses vaatame mõningaid sagedamini kasutatavaid Exceli objekte.
Rakenduse objekt
Rakendusobjekt viitab kogu Exceli rakendusele. Rakendusobjekt sisaldab töövihiku objekti.
Järgmine kood kasutab rakenduse objekti atribuuti WindowState, et määrata Exceli aken maksimaalsele saadaolevale suurusele:
| 12345 | AlammaksimeerimineTheExcelWindow ()Application.WindowState = xlMaximizedEnd Sub |
Töövihikute objekt
Objekt Töövihikud viitab kõigi praegu avatud Exceli töövihikute kogumikule.
Järgmine kood kasutab töövihikuid. Lisa meetod uue töövihiku loomiseks ja selle kogusse lisamiseks:
| 12345 | Alamosa LisamineUuesti töövihikTöövihikutesseKogumik ()Töövihikud. LisaEnd Sub |
Töövihikute kollektsiooni üksikule töövihikule pääsete juurde selle registrinumbri või nime kaudu. Seega võite viidata töövihikule nimega ExcelWb, kasutades töövihikuid („ExcelWB”).
Töövihiku objekt
Töövihiku objekt on osa töövihikute kogust. Töövihiku objekt sisaldab töölehtede kogu (töölehed) ja lehtede kogu (töölehed, diagrammilehed ja makrosed). ActiveWorkbooki objekt viitab aktiivsele töövihikule.
Järgmine kood kasutab ActiveWorkbook.Save meetodit aktiivse töövihiku salvestamiseks:
| 12345 | Tööraamatu salvestamine ()ActiveWorkbook.SaveEnd Sub |
Lehed Objekt
Lehtede objekt viitab töövihiku kõigi töölehtede, diagrammilehtede ja makrolehtede kogumisele. Järgmine kood kasutab meetodit Sheets.Add, et lisada uus tööleht nimega ExtraSheet pärast töövihiku viimast töölehte:
| 123456 | Sub AddingANewSheet ()ActiveWorkbook.Sheets.Add (Pärast: = ActiveWorkbook.Worksheets (Worksheets.Count), Count: = 1, _Tüüp: = xlWorksheet) .Name = "ExtraSheet"End Sub |
Pange tähele lehtede süntaksit. Lisamismeetod on järgmine:
Lehed. Lisa (Enne, Pärast, Krahv, Tüüp) kus:
-Enne on valikuline ja määrab, et uus leht tuleks lisada olemasoleva lehe ette.
-After on valikuline ja määrab, et uus leht tuleks lisada olemasoleva lehe järele.
-Count on valikuline ja määrab lisatavate lehtede arvu.
-Tüüp on valikuline ja määrab lehe tüübi. xlWorksheet lisab uue töölehe, xlChart uue diagrammilehe ja xlExcel4MacroSheet või xlExcel4IntlMacroSheet lisab uue makrolehe. Kui see on tühi, kasutatakse vaikimisi xlWorksheet.
Arvutustabelite kollektsiooni üksikule lehele pääsete juurde selle indeksinumbri või nime kaudu. Nii et võite viidata töölehele nimega SheetOne, kasutades Sheets („SheetOne“).
Töölehtede objekt
Objekt Töölehed viitab kõigi töövihiku töölehtede kogumisele. Järgmine kood kasutab uue töölehe lisamiseks meetodit Töölehed. Lisa.
| 12345 | Sub AddingANewSheet ()Töölehed. LisaEnd Sub |
Töölehtede kogu üksikule lehele pääsete juurde selle indeksinumbri või nime kaudu. Nii et võite viidata töölehele nimega SheetTwo, kasutades töölehti („SheetTwo”).
Töölehe objekt
Töölehe objekt on osa töölehtede kogust. Töölehe objekt sisaldab vahemiku objekti ja muid objekte. ActiveSheet -objekt viitab aktiivsele lehele.
Järgmine kood muudab aktiivse lehe lehe orientatsiooni horisontaalseks:
| 12345 | AlammuutusOrientationToLandscape ()ActiveSheet.PageSetup.Orientation = xlLandscapeEnd Sub |
Pange tähele, et Sheet -objekt sisaldab objekti PageSetup ja selle orientatsiooni atribuudiks on määratud xlLandscape.
Vahemiku objekt
Objekt Range võib viidata töölehe ühele lahtrile või lahtrite komplektile. Järgmine kood näitab teile, kuidas vahemikku kasutada. Valige lahtrite A1: B1 valimiseks meetod:
| 12345 | AlamvalikARange ()Vahemik ("A1: B1"). ValigeEnd Sub |
Kujundab objekti
Objekt Kujud viitab töölehe kõigi kujundite kogumile. Järgmine kood valiks kõik ActiveSheet'i kujundid:
| 12345 | AlamvalimineAllTheShapes ()ActiveSheet.Shapes.SelectAllEnd Sub |
Kuju objekt
Kujuobjekt on osa kollektsioonist Kujundid. Järgmine kood loob ümara ristküliku kuju ja määrab seejärel kujuobjekti nime atribuudi:
| 123456789 | AlamkasutusTheShapeObject ()Töölehtedega (1). Shapes.AddShape (msoShapeRoundedRectangle, _200, 100, 80, 80).Name = "Ümardatud ristkülik"LõpetaEnd Sub |
Exceli VBA objektimudel
Exceli VBA objektimudel kirjeldab kõigi Excelis kasutatavate objektide hierarhiat. Näiteks saate töövihikute objekti abil viidata kaudselt või otse kõigile teistele objektidele. Järgmine kood näitab teile, kuidas valida lahtrit A1, kasutades hierarhilist struktuuri:
| 12345 | Alamklass TheHierachicalStructure ()Töövihikud ("Raamat1"). Töölehed ("Leht1"). Vahemik ("A1"). ValigeEnd Sub |
Objekti muutuja deklareerimine ja määramine
Saate deklareerida ja määrata muutujale objekti, kasutades märksõnu Dim ja Set.
Näiteks:
| 12 | Dim ws töölehenaMäära ws = ActiveWorkbook.ActiveSheet |
Järgmine kood näitab teile, kuidas muutujale vahemiku objekti deklareerida ja määrata:
| 12345678910111213141516 | AlammääramineARangeToAVariable ()Dim rngOne kui objektMäära rngOne = Vahemik ("A1: C1")rngOne.Font.Bold = TõsiKoos rngOne'iga.Font.Bold = Tõsi.Font.Name = "Calibri". Font. Suurus = 9.Font.Värv = RGB (35, 78, 125).Interior.Värv = RGB (205, 224, 180).Borders (xlEdgeBottom) .LineStyle = xlPidevLõpetaEnd Sub |
Tulemuseks on:
VBA haldamiseks on oluline mõista, kuidas objektid töötavad. Lisateavet saate meie interaktiivse VBA õpetuse abil.
