{quote}{login=VovaK}{date=04.08.2010 07:23}{thema=}{post}Можно управлять непосредственно адресацией левой верхней ячейки и нижней правой диапазона относительно активной ячейки:
ActiveCell.Range(Cells(2,2),Cells(4,4)).Select
Можно также смещением, тогда левая верхняя будет с адресом 1,1:
ActiveCell.Range(Cells(1, 1), Cells(4, 4)).Offset(1, 1).Select{/post}{/quote}
А как сместить вверх?
Что-то типа:
ActiveCell.Range(Cells(-2, -1), Cells(-1, -1)).Offset(2, 4).Select
ActiveCell.Range(Cells(2,2),Cells(4,4)).Select
Можно также смещением, тогда левая верхняя будет с адресом 1,1:
ActiveCell.Range(Cells(1, 1), Cells(4, 4)).Offset(1, 1).Select{/post}{/quote}
А как сместить вверх?
Что-то типа:
ActiveCell.Range(Cells(-2, -1), Cells(-1, -1)).Offset(2, 4).Select