Использование объекта Range

Характерная особенность этого объекта, что он не входит ни в одно семейство. Объектом Range является ячейка, строка, столбец, несколько расположенных как рядом, так и отдельно ячеек, или трёхмерный диапазон. Диапазон можно задать в программе:

* используя ссылку на ячейки, Range(«G14») или Range («В1:В6»)

* используя имя диапазона Range(«Итоги»)

* используя объект ActiveCell, указывающий на ячейку (или объект Range), который имеет фокус при вводе данных с клавиатуры

* используя объект Selection, то, что выделено на рабочем листе. С его помощью можно сослаться на диапазон, включающий 1 или несколько ячеек, на рисунок или диаграмму, тогда как ActiveCell всегда указывает на диапазон, содержащий 1 ячейку.

Свойство Cells. Необходим для того, чтобы сослаться на ячейки, зная их положение относительно заданного объекта Range. При указании данного свойства используются следующие параметры:

Range_объект.Cell(Row, Column)

где Row - относительный адрес строки, а Column - столбца.

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

Sub SelectAll()

‘Активизация первой ячейки результирующего множества

Range («A2»).Activate

‘Выделение всего результирующего множества

‘Обратите внимание на то, что метод Select использован для

‘того, чтобы выделить диапазон, включающий несколько ячеек

ActiveCell.CurrentRegion.Select

‘Для вывода количества строк в результирующем множестве,

‘используется свойство Count

MsgBox «Число строк =» & Selection.Rows.Count

End Sub

Свойство Formula. Используется для задания или чтения формулы в стиле мастера функций. Например, Range(«C7»).Formula = «=Sum(C1:C6)»

Свойство Name. Используется для присвоения в программе имя диапазону. Например, для задания диапазона Заголовок, укажите Range(«A1:D1»).Name= «Заголовок»

Свойство Value. Для установки или чтения содержимого указанной ячейки.

Свойство Count. Хранит число объектов семейства, обычно данное свойство применяется, если объект Range используется вместе с семействами Rows и Columns.

Sub Countit()

Dim Counting as String

ActiveCell.CurrentRegion.Select

Counting= «Число ячеек» & Selection.Count

Counting= Counting & Chr(13) & «Число сторк =» & Selection.Rows.Count

Counting= Counting & Chr(13) & «Число столбцов =» & Selection.Columns.Count

MsgBox Counting

End Sub

Метод AutoFit. Используется, чтобы задать автоматическую настройку ширины столбца и высоту строки диапазона. Если необходимо использовать для выделенного диапазона, то: Range(«A2»).Activate

ActiveCell.CurrentRegion.Select

Selection.AutoFit

Метод Clear, ClearComments, ClearContents, ClearFormats, ClearNotes. Для очистки диапазона, комментария, содержимого ячеек, формата и примечаний. При удалении ячеек, находящиеся рядом с уничтоженными, сдвигаются на место удаленных. При очистке убирается содержимое ячеек, форматы, комментарии, но сами пустые ячейки остаются.

(дополнительно)

Метод Copy. Используется для копирования диапазона или другого объекта в Буфер обмена. Если требуется выполнить копирование и вставку одной командой:

Range_объект.Copy destination (destination определяет диапазон, в кот. осуществляется копирование)

Метод Cut. Позволяет вырезать объект и поместить его либо в Буфер обмена, либо в указанный диапазон

Range_объект.Cut destination (destination определяет диапазон, в кот. требуется произвести вставку объекта, если опущен - в Буфер обмена)