12. Работа с объектом Range. Выделение диапазона. Свойства CurrentRegion и Selection. Примеры.

Объект Range  может представлять одну ячейку, несколько ячеек (в том числе несмежные ячейки или наборы несмежных ячеек) или целый лист.

CurrentRegion - Возвращает число строк текущего диапазона. Текущим является диапазон, ограниченный пустыми строками и столбцами и содержащий данный элемент. В следующем примере переменной у присваивается значение, равное числу строк в текущем диапазоне, содержащем ячейку A1:

у = Range( "A1").CurrentRegion.Rows.Count

Объект Selection (выделение диапазона) возникает двояко - либо в результате работы метода Select, либо при вызове свойства Selection. Тип полученного объекта может быть различным и определяется типом выделенного объекта. Чаще всего, объект Selection принадлежит классу Range и тогда при работе с ним можно использовать все свойства и методы объектов класса Range.

Пример использования Selection:

Range("D1").Select

Selection.Range("A1") = 7

Selection.Range("A2") = "=C1+2"

Selection.Range("A3:A4") = "=C1+C2"

Пример использования CurrentRegion:

Dim r As Range, r2 As Range

Set r = Worksheets("Лист1").Range("A1").CurrentRegion

Set r2 = r.Offset(r.Rows.Count, 0)

13)Работа с объектом Range.

Свойства Column, Row, Columns.Count, Rows.Count, Rows(n) и Columns(n). Примеры.

ColumnsиRowsвозвращают соответственно семейства столбцов и строк, из которых состоит диапазон. В следующем примере переменным i и j присваиваются значения, равные количеству столбцов и строк в выделенном диапазоне соответственно:

i = Selection. Columns . Count j = Selection. Rows . Count

Column.CountиRows.Count.Countвозвращает число объектов в наборе. В данном примере переменной х присваивается значение, равное числу строк диапазонаAI: В2 :

х = Range ( "Al :B2") .Rows . Count

Column(n) иRows(n) выбираетn-ю строку среди заданных

Пример использования:

Setr=Selection.Rows(2)

14)Работа с объектом Range.

Обращение к ячейкам с помощью свойства Range.Cells, Range.Cells(r,c) и Range.Cells(pos). Примеры.

Cells — это свойство есть и для объекта Range. Работает оно точно так же, за исключением того, что опять-таки используется своя собственная виртуальная адресация на основе диапазона:

объект. Cells( номер_строки, номер_столбца) ;

объект. Cells( позиция в строке или в диапазоне) ;

объект . Cells .

Пример:

dt = Now

dt1 = Time

Range.Cells(1, 1).Value = dt

Range.Cells(5).Value = dt1

15) Работа с объектом Range.

Нахождение последней заполненной строки и столбца диапазона. Объясните выражения finalRow = Cells(Rows.Count, 1).End(xlUp).Row и finalCol = Cells(1, Columns.Count).End(xlLeft).Column и приведите примеры использования.

 Range - представляет собой ячейки, строки, столбцы, набор ячеек, содержащих один или более смежных блоков ячеек, или 3-D диапазон. Однако это определение не исключает того, что объектом Range может выступать и одна ячейка (Cell) листа. Свойства объекта Excel Range. Рассмотрим основные свойства объекта Range и их применение работе в Excel в Delphi.

1) Formula Возвращает или помещает в диапазон формулу.

2) Value Возвращает или устанавливает значение для диапазона.Свойство Value замечательно тем, что с помощью него можно записать в ячейки абсолютно любые данные, особо не задумываясь о формате данных. 

3) Text Ещё одно простенькое свойство объекта Range - возвращает текст из ячейки. Самое главное отличие от свойства Value -Text возвращает string только для чтения и использовать это свойство для чтения большого объема данных, как в предыдущем примере — ни в коем случае нельзя, т.к. переменная Val вернет значение Null.