Ta vadnica vas bo naučila, kako določiti spremenljivke objekta z uporabo stavka Set v VBA.
Določanje spremenljivk objekta
Predmeti so temelj Microsoft Officea - brez predmetov ne moremo nič doseči. V Excelu predmeti vključujejo predmete delovnega zvezka, delovnega lista ali obsega. V Microsoft Wordu so primeri predmet Dokument ali Tabela. Vsak predmet ima različne Lastnosti in Metode ki jih je mogoče programirati za nadzor vedenja tega predmeta.
Razglasitev spremenljivke objekta
Preden se lahko sklicujemo na predmet v kodi in zato nadzorujemo predmet, ga moramo prijaviti. To lahko storimo z izjavo Dim.
| 123456 | Zatemni wkb kot delovni zvezekZatemni delovne liste kot delovni listDim Rng kot obsegZatemni wdDoc kot dokumentZatemni wdTbl kot tabeloZatemni shp kot obliko |
To Dim deklaracija se lahko pojavi v postopku:
ali zunaj postopka na ravni modula:
Če je spremenljivka deklarirana na ravni modula (izven postopka), se lahko spremenljivka uporablja v celotnem modulu.
Če je spremenljivka objekta deklarirana z izjavo Public, potem lahko spremenljivko uporabite v celotnem projektu VBA:
Nastavi vrednost
Ko deklarirate predmet, morate predmetu dodeliti vrednost. To je treba storiti z uporabo Izjava o nastavitvi in je to mogoče le v a Postopek.
| 12345 | Sub SetObjects ()Nastavite wkb = ActiveWorkbookNastavi wks = List1Nastavi rng = območje ("A1: G4")End Sub |
Opomba: To se razlikuje od dodeljevanja vrednosti spremenljivkam, ki niso predmet. MORATE uporabiti stavek Set za dodelitev predmeta spremenljivki. Če tega ne storite, boste prejeli napako:
Ko objektu dodelite vrednost, lahko nato napišete kodo za nadzor vedenja ali upravljanje predmeta.
Programiranje VBA | Generator kod deluje za vas!
Primeri objektov v Excelu
Objekt delovnega zvezka
Ko deklarirate spremenljivko delovnega zvezka, lahko temu objektu dodelite delovni zvezek in z lastnostmi in metodami, ki so na voljo, upravljate ta predmet. V spodnjem primeru bomo shranili delovni zvezek.
| 123456789101112 | Sub WorkbookObject ()'razglasi predmet delovnega zvezkaZatemni wkb kot delovni zvezek'objektu dodelite neshranjen delovni zvezekSet wkb = Delovni zvezki ("Knjiga1")'shranite delovni zvezekwkb.SaveAs "C: \ data \ testbook.xlsx"'zaprite delovni zvezekwkb.close'Ne pozabite spustiti predmetaNastavi wkb = NičEnd Sub |
Objekt delovnega lista
Podobno lahko z delovnim listom ali delovnimi listi upravljate, ko delovni list deklarirate kot spremenljivko. V spodnjem primeru preimenujemo Sheet1 in Sheet2.
| 12345678910111213 | Sub WorksheetObject ()Zatemni wks1 kot delovni listZatemni wks2 kot delovni list'inicializirajte predmeteNastavi wks1 = List1Nastavi wks2 = List2'preimenujte listewks1.Name = "Stranke"wks2.Name = "Izdelki"'nastavite predmete na ničwks1 = Ničwks2 = NičEnd Sub |
Utrujen od iskanja primerov kode VBA? Preizkusite AutoMacro!
Objekt obsega
Objekt Range je eden najbolj uporabnih predmetov za upravljanje v Excelu. V spodnjem primeru smo krepko označili obseg A1 do E1 in ga oblikovali s spodnjo obrobo.
| 12345678910111213 | Sub RangeObject ()Dim rng1 As Range'intialize the rangeNastavi rng = območje ("A1: E1")'krepči obseg in nastavi spodnjo obroborng.Font.Bold = ResZ rng1.Borders (xlEdgeBottom).LineStyle = xlNeprekinjeno.Indeks barve = 0.TintAndShade = 0.Teža = xlTanekKončaj sEnd Sub |
Predmet oblike
Za delo z oblikami lahko uporabite tudi spremenljivke objektov.
| 123456789101112 | Sub AddShape ()Dim shp As Shape'ustvarite oblikoNastavi shp = ActiveDocument.Shapes.AddShape (msoShapeSmileyFace, 68.25, 225.75, 136.5, 96#)S shp'spremeni barvo in slog notranjosti.Fill.ForeColor.RGB = RGB (255, 255, 0).Fill.Solid'prilagodi nasmeh!.Pravnave. Postavka (1) = 0,07181Končaj sEnd Sub |
