Позовавайки се на обекти в програмирането на Excel 2016 VBA

Навигиране през йерархията

Ако искате да работите с обекти на Excel, всички те са под обекта Application. Затова започнете, като напишете Application .

Всеки друг обект в обектния модел на Excel е под обекта Application. Можете да стигнете до тези обекти, като се придвижите надолу по йерархията и свържете всеки обект по пътя си с оператора точка (.). За да стигнете до обекта Workbook с име Book1.xlsx, започнете с обекта Application и отидете надолу до обекта за колекция Workbooks:

Application.Workbooks(“Book1.xlsx”)

За да отидете по-далеч до конкретен работен лист, добавете оператор на точка и отворете обекта за колекция Worksheets:

Application.Workbooks(“Book1.xlsx”).Worksheets(1)

Все още не е достатъчно далеч? Ако наистина искате да получите стойността от клетка A1 на първия работен лист на работната книга с име Book1.xlsx, трябва да навигирате още едно ниво до обекта Range:

Application.Workbooks(“Book1.xlsx”).Worksheets(1).Range(“A1”).Стойност

Когато препращате към обект Range по този начин, той се нарича напълно квалифицирана препратка. Казахте на Excel точно какъв диапазон искате, на кой работен лист и в коя работна книга и не сте оставили нищо на въображението. Въображението е добро при хората, но не толкова добро в компютърните програми.

Между другото, имената на работни книги също имат точка, за да отделят името на файла от разширението (например Book1.xlsx). Това е просто съвпадение. Точката в името на файл изобщо няма нищо общо с оператора точка.

Опростяване на препратките към обекти

Ако трябваше да квалифицирате напълно всяка препратка към обект, която правите, кодът ви ще стане доста дълъг и може да бъде по-труден за четене. За щастие, Excel ви предоставя някои преки пътища, които могат да подобрят четливостта (и да ви спестят малко въвеждане). Като за начало, обектът Application винаги се предполага. Има само няколко случая, когато има смисъл да го напишете. Пропускането на препратка към обекта на приложението съкращава примера до

Работни книги(“Book1.xlsx”).Работни листове(1).Обхват(“A1”).Стойност

Това е доста добро подобрение. Но чакайте, има още. Ако сте сигурни, че Book1.xlsx е активната работна книга, можете да пропуснете и тази препратка. Сега сте до

Работни листове(1).Обхват(“A1”).Стойност

Сега стигаш донякъде. Познахте ли следващия пряк път? Това е вярно. Ако знаете, че първият работен лист е активният в момента работен лист, Excel приема тази препратка и ви позволява просто да пишете

Диапазон (“A1”). Стойност

Противно на това, което някои хора могат да мислят, Excel няма Cell обект. А клетка е просто обект Range, който се състои от само един елемент.

Описаните тук преки пътища са страхотни, но могат да бъдат и опасни. Ами ако смятате, че Book1.xlsx е активната работна книга? Може да получите грешка или по-лошо, да получите грешна стойност и дори да не осъзнаете, че е грешна. Поради тази причина често е най-добре да квалифицирате напълно своите препратки към обекти.

Структурата With-End With ви помага да квалифицирате напълно вашите препратки, но също така помага да направите кода по-четлив и намалява въвеждането. Най-доброто от двата свята!