Šis raksts ir daļa no manas sērijas: Excel VBA & amp; Makro - soli pa solim pilnīgs ceļvedis Mēs aplūkosim tikai 10 visbiežāk izmantoto Excel VBA objektu sarakstu.

Lejupielādēt Practice Workbook

Lejupielādējiet šo prakses darba burtnīcu, lai vingrinātos, kamēr lasāt šo rakstu.

Kas ir VBA objekti?

An Objekts ir komanda vai kaut kas tāds, kas tiek izmantots VBA kodā, lai veiktu konkrētus uzdevumus.

Portāls VBA (Visual Basic Application) ir objektorientēta programmēšanas valoda. Objekts ir viens no VBA elementiem.

Objektam ir tā īpašība un metode. Metode ir darbība, ko veic šis objekts, un īpašība izskaidro objekta īpašības.

VBA objektu atribūti

Lai piemērotu VBA objektu, objektā ir jābūt metodei vai īpašībai. Šeit mēs aplūkosim šos atribūtus.

Īpašības

Excel ir daudz objektu. Lielākajai daļai Excel VBA objektu, ar kuriem mēs strādājam, ir īpašības.

Piemērs:

• Diapazona objekts ir šādas īpašības. Dažas no tām ir Kolonna , Formula , Rinda , Platums , un Vērtība .
• A Diagramma objektam ir tādas īpašības kā Leģenda , ChartArea , ChartStyle , un tā tālāk.
• ChartTitle arī ir objekts ar īpašībām, piemēram. Fonts , Formāts , un Robeža .

VBA objektu īpašību izmantošana:

Mēs varam uzrakstīt VBA kodu, lai veiktu šādus uzdevumus:

• Varat pārbaudīt objekta pašreizējos īpašību iestatījumus un, pamatojoties uz tiem, veikt kādu darbību.
• Varat mainīt objekta īpašību iestatījumus, iestatot jaunas vērtības.

Aplūkojiet šo VBA paziņojumu:

Range("E10").Value

Šajā paziņojumā, Diapazons ir objekts, Vērtība ir viena no īpašībām. VBA izteikumā objekti un īpašības ir novietoti blakus, atdalot tos ar punktu ( punkts, . ). Vispirms tiek ievietoti objekti, pēc tam to īpašības.

Piemēram, ar šādu VBA paziņojumu tiek iestatīts Vērtība īpašums Diapazons E10:100 .

 Range("E10").Value = 100 

Šis paziņojums izraisīs skaitu 100 lai parādītu Šūna E10 .

Metodes:

Objektiem ir arī metodes. Piemēram, Diapazons objektiem ir Skaidrs metode. Ar šādu VBA izteikumu tiek izdzēsts Diapazons . Šis paziņojums ir līdzvērtīgs tam, ja tiek atlasīts Diapazons un pēc tam izvēloties Sākums ➪ Rediģēšana ➪ Notīrīt ➪ Notīrīt visu :

 Range("A10:C20").Clear 

VBA kodā metodes izskatās kā īpašības. Metodes ir savienotas ar objektiem ar atdalīšanas operatoru (.). Tomēr metodes un īpašības VBA ir dažādi jēdzieni.

Lasīt vairāk: Excel diagramma pazūd, kad dati ir paslēpti (3 risinājumi)

10 visbiežāk izmantoto VBA objektu saraksts programmā Excel

Objektiem Excel izmanto šādu hierarhiju:

Lietojumprogramma → Darba burtnīca → Darba lapa → Diapazons

Šeit mēs detalizēti aplūkosim visbiežāk izmantoto Excel VBA objektu sarakstu.

1. Pieteikuma objekts

Portāls Pieteikums Objekts ir viens no visplašāk izmantotajiem Excel objektiem. Tas tiek izmantots, lai attēlotu visu Excel lietojumprogrammu.

Piemērojot šo objektu programmā Excel, mums ir jāpievieno vajadzīgā īpašība vai metode.

1. piemērs:

Šajā gadījumā mēs izmantojām Aprēķināt Šī makro metode tiek izmantota visu atvērto darbgrāmatu aprēķināšanai.

 Sub Calculate_All_Opened_Workbooks() Application.Calculate End Sub 

2. piemērs:

Tālāk dotajā piemērā mēs izmantojām DisplayScrollBars īpašība ar Pieteikums Objekts. Šī makro ir paredzēts, lai paslēptu ritināšanas joslu.

 Sub Hide_Status_Bar() Application.DisplayScrollBars = False End Sub 

Šeit mēs ieliekam statusu Viltus , kas nozīmē, ka netiks parādītas Excel lapas ritināšanas joslas.

Lasīt vairāk: Kā atvērt darbgrāmatu no ceļa, izmantojot Excel VBA (4 piemēri)

2. Darbgrāmatu objekts

Darba burtnīcas Objekts ir saistīts ar darbgrāmatu. Tas apzīmē pašlaik atvērto darbgrāmatu sarakstu Excel programmā.

1. piemērs:

Šeit mēs izmantojām vienkāršu VBA kodu, pamatojoties uz objektu Workbooks, kas aizver Excel darbgrāmatu.

 Sub Close_All_Opened_Workbooks() Workbooks.Close End Sub 

2. piemērs:

Šajā piemērā tiks pievienots jauns mainīgais page_1 par Disney.xlsx darba burtnīca.

 Sub Add_Variable_to_Specific_Workbook() Set page_1 = Workbooks.Item("Disney.xlsx") End Sub 

3. Darba burtnīcas objekts

Portāls Darba burtnīca objekts pārstāv vienu darbgrāmatu. Tas ir loceklis no Darba burtnīcas kas pašlaik ir aktīvas vai atvērtas. darbgrāmata drīzāk ir darblapu kopums.

1. piemērs:

Mēs vēlamies aizvērt pašreizējo darbgrāmatu.

 Sub Close_Single_Workbook() ActiveWorkbook.Close End Sub 

Līdzīgu kodu mēs piemērojām aizvērt darbgrāmatu. Objekts Darbgrāmatas tiek piemērots visām atvērtajām darbgrāmatām. Bet objekts Darbgrāmata ir piemērojams tikai aktīvajai darbgrāmatai.

2. piemērs:

Šajā piemērā mēs nosauksim šūnu, izmantojot Darba burtnīca objekts.

 Sub Name_A_Cell() ActiveWorkbook.Names.Add Name:="myName", RefersToR1C1:="=Loksne1!R5C5" End Sub 

4. Loksnes Objekts

Portāls Loksnes objekts ir saistīts ar visām norādītās vai aktīvās Excel darbgrāmatas norādītajām vai aktīvajām loksnēm. Loksnes var būt darblapas, diagrammu lapas, mikro lapas.

1. piemērs:

Šis VBA kods aktivizēs 2. darbgrāmatas lapu.

 Sub Activate_Workbook() Darblapas(2).Aktivizēt End Sub 

2. piemērs:

Šajā piemērā mēs pievienosim jaunu lapu pēc 1. loksne.

 Sub Add_New_Sheet() Sheets.Add after:=Sheets(1) End Sub 

5. Darblapas Objekts

Šis Darblapas objekts ir daļa no Loksnes objekts. Tas ir tikai darblapu kopums. Bet Loksnes objekts ietver arī diagrammas lapas un mikro lapas.

1. piemērs:

Tas aktivizēs 2. šādas darba burtnīcas darblapas

 Sub Activate_Worksheet() Darblapas(2).Aktivizēt End Sub 

Mēs varam izmantot arī Loksnes objektu. Bet, ja mēs izmantojam Loksnes objekts, kas var aktivizēt diagrammu vai mikrolapu, ir atkarīgs arī no norādītās darbgrāmatas atrašanās vietas.

2. piemērs:

Mēs kopējam lapu vēlamajā darbgrāmatas vietā.

 Sub Copy_A_Worksheet() Darblapas("Disney").Copy Before:=Darblapas("Sheet1") End Sub 

Līdzīgi lasījumi

• 22 makro piemēri programmā Excel VBA
• 20 praktiski kodēšanas padomi, lai apgūtu Excel VBA
• Kā rakstīt VBA kodu programmā Excel (ar vienkāršiem soļiem)
• VBA makroekrānu veidi programmā Excel (īss ceļvedis)
• Ievads VBA funkcijās un lietojumprogrammās

6. Darba lapas objekts

Portāls Darba lapa objekts ir daļa no Darblapas . Tā attēlo tikai vienu darblapu. Šajā sadaļā tiks parādīts VBA koda paraugs, kas balstīts uz Darba lapa objekts, kas pārdēvē darblapu.

1. piemērs:

Pēc šī VBA koda piemērošanas mainīsies aktīvās darblapas nosaukums.

 Sub Rename_A_Worksheet() ActiveSheet.Name = "Datu kopa -2" End Sub 

2. piemērs:

Mēs vēlamies uzzināt par pašreizējo darblapu. Piemērojiet šādu VBA kodu.

 Sub Show_Worksheet_Name() MsgBox ActiveSheet.Name End Sub 

7. Diapazona objekts

Portāls Diapazons Objekts ir saistīts ar Excel faila šūnām. To izmanto, lai atlasītu vienu šūnu, rindu, kolonnu vai noteiktu šūnu, rindu vai kolonnu skaitu no Excel darblapas. Argumentā jāievada atsauce uz šūnām.

1. piemērs:

Šis ir VBA parauga kods, kas atlasa diapazona šūnas. B5: D5 .

 Sub Select_A_Range() Range("B5:D5").Select End Sub 

2. piemērs:

Šajā piemērā tiks kopēts noteikts diapazons no aktīvās lapas.

 Sub Copy_A_Range1() Range("A1:E1").Copy End Sub 

8. Formas Objekts

Portāls Formas Objekts ir saistīts ar visām darblapā esošajām formām. Izmantojot šo objektu, mēs varam atlasīt un dzēst vai veikt citus uzdevumus.

1. piemērs:

Šis VBA kods atlasīs visu veidu formas no darblapas.

 Sub All_Shapes_of_A_Worksheet() ActiveSheet.Shapes.SelectAll End Sub 

2. piemērs:

Šajā piemērā mēs piemērosim vēlamo darbību aktīvās darblapas esošajām formām.

 Sub Apply_A_Procedure_on_Shapes() ActiveSheet.Shapes(1).OnAction = "ShapeClick" End Sub 

9. Shape Object

Portāls Forma Objekts ir daļa no Shapes. Tas norāda vienu formu aktīvajā darblapā. To izmanto kopā ar elementu Formas objekts.

Piemērs:

Šis vienkāršais VBA kods tiek izmantots, lai izveidotu zvaigzni ar 5 malas.

 Sub Create_A_Shape() ActiveSheet.Shapes.AddShape msoShape5pointStar, 300, 100, 60, 60 End Sub 

Mēs varam zīmēt jebkuru formu, mainot komandu msoShape5pointStar.

10. ListObject Objekts

ListObject ir daļa no ListObjects Objekts . A ListObject norāda vienu darblapas tabulu.

Piemērs:

Šajā piemērā ir paredzēts iegūt datus no tabulas un saglabāt tos masīvā.

 Sub Store_Data_From_Table_To_Array() Dim D_Table As ListObject Dim D_Array As Variant Dim N As Long Set D_Table = ActiveSheet.ListObjects("My_Data") D_Array = D_Table.DataBodyRange For N = LBound(D_Array) To UBound(D_Array) Debug.Print D_Array(N, 2) Next N End Sub 

Lasīt vairāk: Excel VBA, lai aizpildītu masīvu ar šūnu vērtībām (4 piemēroti piemēri)

Secinājums

Šajā rakstā mēs aprakstījām visbiežāk izmantoto Excel VBA objektu sarakstu. Es ceru, ka tas apmierinās jūsu vajadzības. Lūdzu, apskatiet mūsu vietni. ExcelWIKI.com un sniedziet savus ieteikumus komentāru lodziņā.