Пример 5.2

Рассмотрим макрос, который выделяет красным цветом отрицательные значения в следующем диапазоне ячеек: строки с 2 по 4, столбцы с 4 по 7.

Создадим, как и в предыдущем случае, более универсальную версию макроса, которая умеет работать с произвольным диапазоном. Диапазон, для которого нужно выполнить необходимые действия, можно указать тремя способами: выделить на листе перед вызовом макроса, ввести при выполнении макроса, поместить курсор внутрь диапазона и определить границы диапазона автоматически при выполнении макроса. Рассмотрим все эти варианты по очереди.

Пусть диапазон выделен перед вызовом макроса. В этом случае ссылка на этот диапазон содержится в объекте Selection.

Этот вариант макроса отличается от предыдущего только тем, что значения переменных rmin, rmax, cmin, cmax вычисляются. Свойства Row и Column объекта Range содержат номер первой строки и столбца диапазона. Количество строк и столбцов в диапазоне – это значения R.Rows.Count и R.Columns.Count.

Рассмотрим вариант макроса для случая, когда диапазон вводится во время выполнения с помощью диалогового окна.

И, наконец, рассмотрим, как можно автоматически определить границы диапазона. Для этого воспользуемся свойством CurrentRegion объекта Range, которое расширяет текущий диапазон до пустых строк (столбцов) или границ листа. При выполнении макроса курсор должен находиться внутри нужного диапазона.

Три последних варианта макроса отличаются только тем, как определяется значение переменной R, содержащей ссылку на нужный диапазон.

Для работы с ячейками можно использовать не только свойство Cells, но и объект Range. В этом случае нужно помнить, что Range – это коллекция ячеек, поэтому строки и столбцы в ней нумеруются с единицы. Для доступа к элементу нужно указать номер его строки и столбца внутри диапазона (а не на листе). Приведем решение нашей задачи еще одним способом (для случая, когда необходимый диапазон выделен перед выполнением макроса).