Normal testing

Давеча писал-пописывал тест-кейсы в Excel 2003, и придумал себе проблему: удалять/добавлять строки с помошью «горячих клавиш», не трогая мышь.

В Excel 2003 нет «Горячих клавиш», которые позволяют убивать строки. Можно выделить всю строку нажатием «Shift+Пробел», можно скопировать ее, или даже удалить то, что в ней находится. Но не ее саму.

Но такую комбинацию можно создать, причем двумя способами:

1) Быстрый способ: Назначение горячей клавиши.

2) Дальновидный способ: Создание макроса, и назначение ему горячей клавиши макросу.

Назначение горячей клавиши.

Вызываем справку Excel и ищем «Назначение или изменение сочетания клавиш» и читаем: Сочетание клавиш позволяет выбирать команду меню или кнопку нажатием клавиш ALT+буква.

Если вкратце: в контекстном меню в поле Имя нужно ввести название команды меню, обязательно указав амперсанд (&) перед буквой, которая будет использоваться в сочетании клавиш.

Если кнопка называется «Delete Row», и мы хотим назначить ей горячую клавишу на букве «R», то кнопку надо назвать так: «Delete &Row». И при нажатии Alt+R строка убьет себя сама. Нашими руками.

Проблема с назначением букв появится только при смене раскладки клавиатуры. Поэтому архиудобнее назначать не буквы, а цифры. Alt+1 сработает при любой раскладке.

Создание макроса

Создать макрос можно как руками (они должны расти не из одного места и иметь соответствующее образование), так и автоматически: «Сервис / Макрос / Начать запись».

Назовем новый макрос DelRows, назначим буковку, которая будет сочетатся с Ctrl (тут засада — большинство сочетаний с Ctrl являются системно зарезервированными, поэтому буквосочетание надо продумать заранее), и включаем запись (жмем «Ок») наших действий. Появляется «летающее» оконце.

Теперь надо точно сделать то, что в будущем будет делать макрос. Выделяем строку и выбираем команду «Убить».

По завершении действий жмем кнопку «Остановить» в том самом летающем оконце, откроем новый файл с каким-то значениями, и нажмем наше волшебное сочетание клавиш.

Если все в порядке — поздравляю.

Но, в принципе, все в порядке не будет. При записи «в лоб» макрос записывает точные координаты нахождения курсора, поэтому его надо будет править.

Жмем Alt+F11 — переходим в редактор Visual Basic — и ищем свежесозданный макрос. Поищем и пообрящем.

Макрос выглядит типа так:

Sub DelRows()'' Комментарий

               Komanda.Etogo.Macrosa               Vtoraia.Komanda.Etogo.MacrosaEnd Sub

В общем, нам надо вписать вместо свежего макроса следующий текст:

Sub DelRows()              Selection.EntireRow.DeleteEnd Sub

Sub AddRows()              Selection.EntireRow.InsertEnd Sub

Это сразу два макроса. Один Удаляет строку, другой Создает. Нажмем Alt+F8, и в свойствах макросов назначим им «горячие клавиши».

Enjoy.