Ovaj vodič će vas naučiti kako definirati varijable objekta pomoću naredbe Set u VBA.
Definiranje varijabli objekta
Objekti su kamen temeljac Microsoft Officea - bez objekata ništa ne možemo postići. U Excelu objekti uključuju objekte radne knjige, radnog lista ili raspona. U programu Microsoft Word primjeri su objekt Dokument ili Tablica. Svaki objekt ima različite Svojstva i Metode koje se mogu programirati za kontrolu ponašanja tog objekta.
Deklariranje varijable objekta
Prije nego što možemo referencirati objekt u kodu, pa stoga kontrolirati objekt, moramo ga deklarirati. To možemo učiniti pomoću Dim izjave.
123456 | Zatamni wkb kao radnu bilježnicuZatamni radni listovi kao radni listDim Rng kao rasponZatamni wdDoc kao dokumentDim wdTbl kao tablicaDim shp kao Oblik |
Ovaj Dim deklaracija se može dogoditi unutar postupka:
ili izvan postupka na razini modula:
Ako je varijabla deklarirana na razini modula (izvan procedure), varijabla se može koristiti u cijelom modulu.
Ako je varijabla objekta deklarirana s Public naredbom, tada se varijabla može koristiti u cijelom VBA projektu:
Postavljena vrijednost
Nakon što deklarirate objekt, morate objektu dodijeliti vrijednost. To se mora učiniti pomoću Postavka izjave a može se učiniti samo unutar a Postupak.
12345 | Sub SetObjects ()Postavite wkb = ActiveWorkbookPostavite wks = List1Postavi rng = raspon ("A1: G4")Kraj podm |
Napomena: Ovo se razlikuje od dodjeljivanja vrijednosti neobjektnim varijablama. MORATE koristiti izraz Set za dodjeljivanje objekta varijabli. Ako to ne učinite, dobit ćete pogrešku:
Nakon što objektu dodijelite vrijednost, tada možete napisati kôd za upravljanje ponašanjem ili manipulaciju objektom.
VBA programiranje | Generator koda radi za vas!
Primjeri objekata u Excelu
Objekt radne bilježnice
Nakon što deklarirate varijablu radne knjige, tada možete dodijeliti radnu knjigu tom objektu i upotrijebiti dostupna svojstva i metode za upravljanje tim objektom. U donjem primjeru spremit ćemo radnu knjigu.
123456789101112 | Sub WorkbookObject ()'deklarirati objekt radne knjigeZatamni wkb kao radnu bilježnicu'dodijelite nespremljenu radnu knjigu objektuPostavi wkb = Radne knjige ("Knjiga1")'spremite radnu knjiguwkb.SaveAs "C: \ data \ testbook.xlsx"'zatvorite radnu knjižicuwkb.blizu'ne zaboravite otpustiti objektPostavite wkb = NištaKraj podm |
Objekt radnog lista
Slično, radnim listom ili radnim listovima možete manipulirati nakon što radni list deklarirate kao varijablu. U donjem primjeru preimenujemo Sheet1 i Sheet2.
12345678910111213 | Podradni listObjekt ()Zatamni wks1 kao radni listZatamni wks2 kao radni list'inicijalizirati objektePostavite wks1 = List1Postavite wks2 = List2'preimenujte listovewks1.Name = "Kupci"wks2.Name = "Proizvodi"'postavite predmete na ništawks1 = Ništawks2 = NištaKraj podm |
Umorni ste od traženja primjera VBA koda? Isprobajte AutoMacro!
Objekt dometa
Objekt Range jedan je od najkorisnijih objekata za manipulaciju u Excelu. U donjem primjeru podebljamo raspon A1 do E1 i oblikujemo ga s donjim rubom.
12345678910111213 | Pod RangeObject ()Dim rng1 As Range'incijalizirati rasponPostavi rng = raspon ("A1: E1")'podebljajte raspon i postavite donju granicurng.Font.Bold = IstinaS rng1.Border (xlEdgeBottom).LineStyle = xlKontinuirano.Indeks boje = 0.TintAndShade = 0.Težina = xlTanakZavrši sKraj podm |
Objekt oblika
Za rad s oblicima možete koristiti i varijable objekata.
123456789101112 | SubAdShape ()Dim shp As Shape'stvoriti oblikPostavi shp = ActiveDocument.Shapes.AddShape (msoShapeSmileyFace, 68.25, 225.75, 136.5, 96#)Sa shp'promijeniti boju i stil u unutrašnjosti.Fill.ForeColor.RGB = RGB (255, 255, 0).Punite.Cvrsto'namjesti osmijeh!.Podešavanja. Stavka (1) = 0,07181Završi sKraj podm |