Excel VBA objekti odnose se na pojedinačne "entitete" sastavljene od koda i podataka. Sama aplikacija Excel objekt je, kao i radne knjige, radni listovi, rasponi ćelija i oblici. Svaki objekt ima povezana svojstva i metode. Objekti mogu sadržavati i druge objekte, a objekt zbirke koristi se za upućivanje na grupu istih Excel objekata.
U ovom ćemo vodiču pogledati neke često korištene Excel objekte.
Objekt aplikacije
Aplikacijski objekt odnosi se na cijelu Excel aplikaciju. Objekt Application sadrži objekt radne knjige.
Sljedeći kôd koristi svojstvo WindowState objekta Application za postavljanje prozora programa Excel na najveću dostupnu veličinu:
| 12345 | Sub MaximizingTheExcelWindow ()Application.WindowState = xlMaximizedKraj podm |
Objekt radnih bilježnica
Objekt Radne knjige odnosi se na zbirku svih trenutno otvorenih Excel radnih knjiga.
Sljedeći kôd koristi metodu Workbooks.Add za stvaranje nove radne knjige i njeno dodavanje u zbirku:
| 12345 | Dodatno dodavanjeANewWorkbookToTheWorkbooksCollection ()Radne bilježnice.DodajKraj podm |
Pojedinačnoj radnoj knjizi u zbirci Radnih knjiga možete pristupiti putem njezinog indeksnog broja ili naziva. Dakle, mogli biste se obratiti radnoj knjizi koja se zove ExcelWb, koristeći radne knjige ("ExcelWB").
Objekt radne bilježnice
Objekt radne knjige dio je zbirke Radne knjige. Objekt radne knjige sadrži zbirku radnih listova (radni listovi) i zbirku listova (radni listovi, listovi grafikona i makro tablice). Objekt ActiveWorkbook odnosi se na aktivnu radnu knjigu.
Sljedeći kôd koristi metodu ActiveWorkbook.Save za spremanje trenutne aktivne radne knjige:
| 12345 | Sub SavingTheWorkbook ()ActiveWorkbook.SaveKraj podm |
Objekt listova
Objekt listova odnosi se na zbirku svih radnih listova, listova grafikona i makro ploča u radnoj knjizi. Sljedeći kôd koristi metodu Sheets.Add za dodavanje novog radnog lista pod nazivom ExtraSheet, nakon posljednjeg radnog lista u radnoj knjizi:
| 123456 | Dodatno dodavanjeANewSheet ()ActiveWorkbook.Sheets.Add (After: = ActiveWorkbook.Worksheets (Worksheets.Count), Count: = 1, _Type: = xlWorksheet) .Name = "ExtraSheet"Kraj podm |
Obratite pažnju na sintaksu metode Sheets.Add je:
Listovi.Dodaj (Prije, Nakon, Računati, Tip) gdje:
-Prije nije obvezna i određuje da se novi list treba dodati prije postojećeg lista.
-After je izborno i određuje da se novi list treba dodati nakon postojećeg lista.
-Count nije obavezan i određuje broj listova za dodavanje.
-Tip je neobavezan i određuje vrstu lista. xlWorksheet bi dodao novi radni list, xlChart bi dodao novi list grafikona, a xlExcel4MacroSheet ili xlExcel4IntlMacroSheet bi dodali novi makro tablicu. Ako je prazno, koristi se zadani xl radni list.
Pojedinačnom listu u zbirci Tablica možete pristupiti putem njegovog indeksnog broja ili naziva. Dakle, mogli biste se pozvati na radni list pod nazivom SheetOne, koristeći Sheets ("SheetOne").
Radni listovi Objekt
Objekt Radni listovi odnosi se na zbirku svih radnih listova u radnoj knjizi. Sljedeći kod koristi metodu Worksheets.Add za dodavanje novog radnog lista:
| 12345 | Dodatno dodavanjeANewSheet ()Radni listovi.DodatiKraj podm |
Pojedinačnom listu u zbirci radnih listova možete pristupiti putem njegovog indeksnog broja ili naziva. Dakle, mogli biste se obratiti radnom listu pod nazivom SheetTwo, koristeći radne listove ("SheetTwo").
Objekt radnog lista
Objekt radnog lista dio je zbirke Radni listovi. Objekt radnog lista sadrži objekt raspona i druge objekte. Objekt ActiveSheet odnosi se na aktivni list.
Sljedeći kôd mijenja orijentaciju stranice aktivnog lista u pejzaž:
| 12345 | PodizmjenaOrientationToLandscape ()ActiveSheet.PageSetup.Orientation = xlLandscapeKraj podm |
Imajte na umu da objekt Sheet sadrži objekt PageSetup i da je njegovo svojstvo orijentacije postavljeno na xlLandscape.
Objekt dometa
Objekt Range može se odnositi na jednu ćeliju ili skup ćelija na radnom listu. Sljedeći kôd prikazuje kako se pomoću metode Range.Select odabiru ćelije A1: B1:
| 12345 | Pod OdabirARange ()Raspon ("A1: B1"). OdaberiteKraj podm |
Oblik Objekt
Objekt Oblici odnosi se na zbirku svih oblika na radnom listu. Sljedeći kôd odabrao bi sve oblike na ActiveSheet -u:
| 12345 | Pod OdabiromAllTheShapes ()ActiveSheet.Shapes.SelectAllKraj podm |
Objekt oblika
Objekt Shape dio je zbirke Shapes. Sljedeći kôd stvorio bi zaobljeni oblik pravokutnika i zatim postavio svojstvo naziva objekta oblika:
| 123456789 | Pod pomoću TheShapeObject ()S radnim listovima (1). Oblici.AddShape (msoShapeRoundedRectangle, _200, 100, 80, 80).Name = "Zaobljeni pravokutnik"Završi sKraj podm |
Excel VBA objektni model
Excel -ov VBA objektni model opisuje hijerarhiju svih objekata koje možete koristiti u Excelu. Na primjer, možete koristiti objekt Radne knjige za neizravno ili izravno upućivanje na sve ostale objekte. Sljedeći kôd pokazuje kako odabrati ćeliju A1, koristeći hijerarhijsku strukturu:
| 12345 | Pod KorištenjeHijerahijskeStrukture ()Radne bilježnice ("Knjiga1"). Radni listovi ("List1"). Raspon ("A1"). OdaberiteKraj podm |
Deklariranje i dodjeljivanje varijable objekta
Objekt možete proglasiti i dodijeliti varijabli pomoću ključnih riječi Dim i Set.
Na primjer:
| 12 | Zatamni ws kao radni listPostavite ws = ActiveWorkbook.ActiveSheet |
Sljedeći kôd pokazuje kako deklarirati i dodijeliti objekt Range varijabli:
| 12345678910111213141516 | PododređivanjeARangeToAVariable ()Dim rngOne As ObjectPostavi rngOne = Raspon ("A1: C1")rngOne.Font.Bold = IstinaS rngOneom.Font.Bold = Istina.Font.Name = "Calibri".Veličina fonta = 9.Boja fonta = RGB (35, 78, 125).Interijer.Boja = RGB (205, 224, 180).Granice (xlEdgeBottom) .LineStyle = xlKontinuiranoZavrši sKraj podm |
Rezultat je:
Bitno je razumjeti kako objekti funkcioniraju kako bi svladali VBA. Možete saznati više s našim interaktivnim VBA vodičem.
