Съдържание
Тази статия е част от поредицата ми: Excel VBA & Макроси - пълно ръководство стъпка по стъпка . Ще разгледаме списък само с 10 най-често използвани обекти на Excel VBA.
Изтегляне на работна тетрадка за практика
Изтеглете тази учебна тетрадка, за да се упражнявате, докато четете тази статия.
VBA Objects.xlsmКакво представляват обектите на VBA?
Един Обект е команда или нещо, което се прилага в кода VBA за изпълнение на някои специфични задачи.
Сайтът VBA (Visual Basic Application) е обектно-ориентиран език за програмиране. Обектът е един от елементите на VBA.
Един обект има свое свойство и метод. Методът е операцията, която се извършва от този обект, а свойството обяснява характеристиките на този обект.
Атрибути на обектите на VBA
За да приложите обект на VBA, трябва да има метод или свойство в обекта. Тук ще обсъдим тези свойства.
Имоти
Свойства на обектите на VBA могат да се разглеждат като настройки на обекти.Excel има много обекти. Повечето от обектите в Excel VBA, с които работим, имат свойства.
Пример:
- Обект от обхвата има свойства. Някои от тях са Колона , Формула , Ред , Ширина , и Стойност .
- A Диаграма обектът има свойства, като например Легенда , ChartArea , ChartStyle и т.н.
- ChartTitle също е обект със свойства като Шрифт , Формат , и Граница .
Използване на свойствата на обектите във VBA:
Можем да напишем код VBA, за да направим следното:
- Можете да разгледате текущите настройки на свойствата на даден обект и да направите нещо въз основа на тези настройки.
- Можете да промените настройките на свойствата на обекта, като зададете нови стойности.
Разгледайте тази команда VBA:
Range("E10").Value
В това изявление, Обхват е обект, Стойност е едно от свойствата. В декларацията на VBA обектите и свойствата се поставят едно до друго, като се разделят с точка ( точка, . ). Първо се поставят обектите, а след това техните свойства.
Например следната команда VBA задава Стойност собственост на Обхват E10:100 .
Range("E10").Value = 100 Това изявление ще доведе до увеличаване на броя 100 за показване в Клетка E10 .
Методи:
A метод е действие, реализирано върху обект.Обектите имат и методи. Например, Обхват обектите имат Clear Следващият оператор на VBA изчиства Обхват Това изявление е равносилно на избор на Обхват и след това изберете Начало ➪ Редактиране ➪ Изчистване ➪ Изчистване на всички :
Range("A10:C20").Clear В кода на VBA методите изглеждат като свойства. Методите се свързват с обектите с разделителен оператор (.). Въпреки това методите и свойствата са различни понятия във VBA.
Прочетете още: Диаграмата на Excel изчезва, когато данните са скрити (3 решения)
Списък на 10 най-често използвани VBA обекти в Excel
Excel следва йерархия при обектите, която е:
Приложение → Работна книга → Работен лист → Диапазон
Тук ще разгледаме подробно списък с най-често използваните обекти на Excel VBA.
1. Обект на приложение
Сайтът Приложение Обектът е един от най-широко използваните обекти на Excel. Той се използва за представяне на цялото приложение на Excel.
| Методи | Имоти |
|---|---|
| Изчислете | ActiveCell |
| CalculateFull | ActiveSheet |
| InputBox | ActiveWindow |
| Напуснете | ActiveWorkbook |
| Изпълнявайте | DisplayScrollBars |
| Отмяна на | DisplayFormulaBar |
| Изчакайте | Път |
| StatusBar |
Трябва да добавим необходимото свойство или метод, докато прилагаме този обект в Excel.
Пример 1:
Тук използвахме Изчислете Този макрос се използва за изчисляване на всички отворени работни книги.
Sub Calculate_All_Opened_Workbooks() Application.Calculate End Sub 
Пример 2:
В примера по-долу използвахме DisplayScrollBars със свойството Приложение Целта на този макрос е да скрие лентата за превъртане.
Sub Hide_Status_Bar() Application.DisplayScrollBars = False End Sub 
Тук поставяме статус Фалшив , което означава, че няма да се показват лентите за превъртане на листа на Excel.
Прочетете още: Как да отворите работна книга от път с помощта на Excel VBA (4 примера)
2. Обект "Работни книги
Работни книги Обектът е свързан с работната книга. Той обозначава списъка на текущо отворените работни книги в приложението Excel.
| Методи | Имоти |
|---|---|
| Добавяне на | Приложение |
| Излизане от сайта | Граф |
| Затвори | Създател |
| Отворете | Артикул |
| Родител |
Пример 1:
Тук приложихме прост VBA код, базиран на обекта Workbooks, който ще затвори работната книга на Excel.
Sub Close_All_Opened_Workbooks() Workbooks.Close End Sub 
Пример 2:
Този пример ще добави нова променлива страница_1 на Disney.xlsx работна тетрадка.
Sub Add_Variable_to_Specific_Workbook() Set page_1 = Workbooks.Item("Disney.xlsx") End Sub 
3. Обект на работната книга
Сайтът Работна тетрадка обект представлява една работна книга. Той е член на Работни книги които в момента са активни или отворени. работната книга е по-скоро колекция от работни листове.
| Методи | Имоти |
|---|---|
| Активен | ActiveChart |
| Добавяне към любими | ActiveSheet |
| Затвори | AutoSaveOn |
| DeleteNumberFormat | Пълно име |
| Запазете | UserStatus |
| SaveAs |
Пример 1:
Искаме да затворим текущата работна книга.
Sub Close_Single_Workbook() ActiveWorkbook.Close End Sub 
Приложихме подобен код към затворената работна книга. Обектът Workbooks се прилага към всички отворени работни книги. Но обектът Workbook е приложим само към активната работна книга.
Пример 2:
В този пример ще дадем име на клетка, като използваме Работна тетрадка обект.
Sub Name_A_Cell() ActiveWorkbook.Names.Add Name:="myName", RefersToR1C1:="=Sheet1!R5C5" End Sub 
4. Обект Sheets
Сайтът Листове Обектът е свързан с всички видове листове на посочената или активната работна книга на Excel. Листове могат да бъдат работни листове, графични листове, микролистове.
| Методи | Имоти |
|---|---|
| Добавяне на | Приложение |
| Добавяне2 | Граф |
| Копие | Артикул |
| Изтриване на | Родител |
| Преместване | Видими |
| PrintOut | |
| PrintPreview | |
| SelectCalculate |
Пример 1:
Този код VBA ще активира 2. лист от работната книга.
Sub Activate_Workbook() Worksheets(2).Activate End Sub 
Пример 2:
В този пример ще добавим нов лист след 1. лист.
Sub Add_New_Sheet() Sheets.Add after:=Sheets(1) End Sub 
5. Обект "Работни листове
Този Работни листове обектът е част от Листове Това е колекция само от работните листове. Но обектът Листове обектът включва също така листове с диаграми и микролистове.
| Методи | Имоти |
|---|---|
| Копие | Приложение |
| Изтриване на | Граф |
| Преместване | Създател |
| PrintOut | Артикул |
| PrintPreview | Родител |
| Изберете | Видими |
| Добавяне на | |
| Добавяне2 |
Пример 1:
Той ще активира 2. работен лист от следната работна книга
Sub Activate_Worksheet() Worksheets(2).Activate End Sub 
Можем да използваме и Листове обект. Но ако използваме Листове обект, който може да активира диаграма или микролист, също зависи от местоположението на посочената работна книга.
Пример 2:
Ще копираме лист на желаното от нас място в работната книга.
Sub Copy_A_Worksheet() Worksheets("Disney").Copy Before:=Worksheets("Sheet1") End Sub 
Подобни четива
- 22 примера за макроси в Excel VBA
- 20 практични съвета за кодиране за овладяване на Excel VBA
- Как да пишем VBA код в Excel (с лесни стъпки)
- Видове макроси VBA в Excel (кратко ръководство)
- Въведение във функциите и приложенията на VBA
6. Обект на работен лист
Сайтът Работен лист обектът е част от Работни листове . Той представлява само един работен лист. В този раздел ще бъде показан примерен VBA код, базиран на Работен лист обект, който преименува работен лист.
| Методи | Имоти |
|---|---|
| Активиране на | Приложение |
| Изчислете | Клетки |
| CheckSpelling | Колони |
| Копие | Коментари |
| Изтриване на | Име |
| Оценяване на | Следваща |
| Преместване | Контур |
| Паста | Създаване на страница |
| PasteSpecial | Родител |
| PrintOut | Обхват |
| PrintPreview | Редове |
| SaveAs | Форми |
| Изберете | Сортиране |
| Tab | |
| Тип | |
| Видими |
Пример 1:
Името на активния работен лист ще се промени след прилагането на този код VBA.
Sub Rename_A_Worksheet() ActiveSheet.Name = "Data Set -2" End Sub 
Пример 2:
Искаме да знаем за текущия работен лист. Приложете следния код VBA.
Sub Show_Worksheet_Name() MsgBox ActiveSheet.Name End Sub 
7. Обект от обхвата
Сайтът Обхват Обектът е свързан с клетките на файла на Excel. Използва се за избор на единична клетка, ред, колона или определен брой клетки, редове или колони от работен лист на Excel. В аргумента трябва да поставим препратка към клетката.
| Методи | Имоти |
|---|---|
| Активиране на | Адрес |
| Автоматично попълване | Приложение |
| Изчислете | Области |
| Clear | Клетки |
| Копие | Колона |
| Изтриване на | Граф |
| Намерете | Край на |
| Вмъкване на | Шрифт |
| PasteSpecial | Височина |
| Замяна на | Артикул |
| Изпълнявайте | Вляво |
| Изберете | ListObject |
| Покажи | Име |
| Сортиране | Следваща |
| Таблица | Родител |
| Обхват | |
| Ред | |
| Редове | |
| Топ | |
| Утвърждаване | |
| Стойност | |
| Ширина |
Пример 1:
Това е примерен код VBA, който избира клетки от обхвата B5:D5 .
Sub Select_A_Range() Range("B5:D5").Select End Sub 
Пример 2:
Този пример ще копира определен диапазон от активния лист.
Sub Copy_A_Range1() Range("A1:E1").Copy End Sub 
8. Обект "Форми
Сайтът Форми Обектът е свързан с всички форми, които съществуват в работния лист. Можем да избираме и изтриваме или да изпълняваме други задачи, използвайки този обект.
| Методи | Имоти |
|---|---|
| AddCallout | Приложение |
| Добавяне на съединител | Граф |
| AddLine | Създател |
| AddPicture | Родител |
| AddShape | Обхват |
| Артикул | |
| SelectAll |
Пример 1:
Този код VBA ще избере всички видове форми от работен лист.
Sub All_Shapes_of_A_Worksheet() ActiveSheet.Shapes.SelectAll End Sub 
Пример 2:
В този пример ще приложим желаното действие към съществуващите форми на активния работен лист.
Sub Apply_A_Procedure_on_Shapes() ActiveSheet.Shapes(1).OnAction = "ShapeClick" End Sub 
9. Обект на форма
Сайтът Форма Обектът е част от Shapes. Той показва единична форма в активен работен лист. Използва се с Форми обект.
| Методи | Имоти |
|---|---|
| Направете заявка на | Приложение |
| Копие | AutoShapeType |
| Изрежете | BackgroundStyle |
| Изтриване на | Диаграма |
| Дублиране на | Съединител |
| Изберете | Напълнете |
| Височина | |
| Вляво | |
| Име | |
| OnAction | |
| Родител | |
| Отражение | |
| Заглавие | |
| Топ | |
| Тип | |
| Видими | |
| Ширина |
Пример:
Този прост код VBA се прилага за създаване на звезда с 5 ръбове.
Sub Create_A_Shape() ActiveSheet.Shapes.AddShape msoShape5pointStar, 300, 100, 60, 60 End Sub 
Можем да нарисуваме всякакъв вид форма, като променим командата msoShape5pointStar.
10. Обект ListObject
ListObject е част от Обект ListObjects . A ListObject показва една таблица от работния лист.
| Методи | Имоти |
|---|---|
| Изтриване на | Активен |
| Публикувайте | Приложение |
| Обновяване | AutoFilter |
| Промяна на размера | Коментар: |
| Създател | |
| Име | |
| Родител | |
| Обхват | |
| Сортиране | |
| Резюме |
Пример:
Този пример е за извличане на данни от таблица и съхраняването им в масив.
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 
Прочетете още: Excel VBA за попълване на масив със стойности на клетките (4 подходящи примера)
Заключение
В тази статия описахме списъка с често използваните обекти на Excel VBA. Надявам се, че това ще задоволи нуждите ви. Моля, разгледайте нашия уебсайт ExcelWIKI.com и дайте своите предложения в полето за коментари.
