Един от начините, по които можете да получите код в VBA модул, е като запишете вашите действия, като използвате записа на макроси на Excel. Едно нещо, което трябва да запомните е, че можете да записвате само неща, които можете да правите директно в Excel. Показването на кутия за съобщения не е в нормалния репертоар на Excel. (Това е нещо от VBA.) Записващото устройство на макроси е полезно, но в много случаи вероятно ще трябва да въведете поне някакъв код ръчно.
Ето пример стъпка по стъпка, който ви показва как да запишете макрос, който вмъква нов работен лист и скрива всички освен първите десет реда и всички освен първите десет колони. Ако искате да опитате този пример, започнете с нова, празна работна книга и следвайте тези стъпки:
Активирайте работен лист в работната книга.
Всеки работен лист ще свърши работа.
Щракнете върху раздела Разработчик и се уверете, че Използване на относителни препратки не е маркирано.
Този макрос ще бъде записан с помощта на абсолютни препратки.
Изберете Разработчик → Код → Запис на макрос или щракнете върху иконата до индикатора Готов в левия край на лентата на състоянието.
Excel показва диалоговия прозорец за запис на макрос.
В диалоговия прозорец Запис на макрос дайте име на макроса TenByTen и натиснете Shift+T за клавиша за бърз достъп.
Макросът може да се изпълни, когато натиснете Ctrl+Shift+T.
Щракнете върху OK, за да започнете да записвате.
Excel автоматично вмъква нов VBA модул в проекта, който съответства на активната работна книга. От този момент нататък Excel преобразува вашите действия във VBA код. Докато записвате, иконата в лентата на състоянието се превръща в малък квадрат. Това е напомняне, че записът на макроси работи. Можете също да щракнете върху тази икона, за да спрете записа на макроси.
Щракнете върху иконата Нов лист вдясно от последния раздел на лист.
Excel вмъква нов работен лист.
Изберете цялата колона K (11-та колона) и натиснете Ctrl+Shift+стрелка надясно; след това щракнете с десния бутон върху избрана колона и изберете Скрий от контекстното меню.
Excel скрива всички избрани колони.
Изберете целия ред 11 и натиснете Ctrl+Shift+стрелка надолу; след това щракнете с десния бутон върху произволен избран ред и изберете Скрий от контекстното меню.
Excel скрива всички избрани колони.
Изберете клетка A1.
Изберете Разработчик → Код → Спиране на записа или щракнете върху бутона Спиране на записа в лентата на състоянието (малкия квадрат).
Excel спира да записва вашите действия.
За да видите този новозаписан макрос, натиснете Alt+F11, за да активирате VBE. Намерете името на работната книга в прозореца на проекта. Виждате, че проектът има посочен нов модул. Името на модула зависи от това дали сте имали други модули в работната книга, когато сте започнали да записвате макроса. Ако не сте го направили, модулът ще бъде наречен Module1. Можете да щракнете двукратно върху модула, за да видите прозореца с код за модула.
Ето кода, генериран от вашите действия:
Под TenByTen()
'
' TenByTen макрос
'
' Клавишна комбинация: Ctrl+Shift+T
'
Sheets.Add After:=ActiveSheet
Колони(“K:K”).Изберете
Диапазон(Избор, Избор. Край(xlToRight)).Избор
Selection.EntireColumn.Hidden = Вярно
Редове(“11:11”). Изберете
Диапазон(Избор, Избор. Край(xlDown)).Избор
Selection.EntireRow.Hidden = Вярно
Диапазон (“A1”). Изберете
Край под
За да изпробвате този макрос, активирайте всеки работен лист и натиснете клавиша за бърз достъп, който сте задали в стъпка 4: Ctrl+Shift+T.
Ако не сте задали клавиш за бърз достъп на макроса, не се притеснявайте. Ето как да покажете списък с всички налични макроси и да стартирате този, който искате:
Изберете Разработчик → Код → Макроси.
Вентилаторите на клавиатурата могат да натискат Alt+F8. Всеки от тези методи показва диалогов прозорец, който изброява всички налични макроси.
Изберете макроса в списъка (в този случай TenByTen).
Щракнете върху бутона Run.
Excel изпълнява макроса и получавате нов работен лист с десет видими реда и десет видими колони.
Можете да изпълнявате произволен брой команди и да извършвате произволен брой действия, докато записващото устройство на макроси работи. Excel прилежно превежда вашите действия с мишката и натискания на клавиши във VBA код.
И, разбира се, можете също да редактирате макроса, след като го запишете. За да тествате новите си умения, опитайте да редактирате макроса, така че да вмъкне работен лист с девет видими реда и колони – идеално за пъзел Судоку.