Как можно получить первую и последнюю клетку обьекта типа RANGE - VB
Формулировка задачи:
Привет,
есть обьект типа RANGE. Как можно получить первую и последнюю клетку етого обьекта. Например, А1:Р6. Я хочу получить А1 и Р6. Помогите
есть обьект типа RANGE. Как можно получить первую и последнюю клетку етого обьекта. Например, А1:Р6. Я хочу получить А1 и Р6. Помогите
Решение задачи: «Как можно получить первую и последнюю клетку обьекта типа RANGE»
textual
Листинг программы
<font color="blue">Sub</font> f()
<font color="blue">Dim</font> rng <font color="blue">As</font> Range
<font color="blue">Set</font> rng = Range(<font color="teal">"A1:B7"</font>)
a = rng.Cells(<font color="darkblue"><b>1</b></font>, <font color="darkblue"><b>1</b></font>).Address(False, False)
MsgBox a
b = rng.Cells(rng.Count).Address(False, False)
MsgBox b
<font color="blue">End</font> <font color="blue">Sub</font>