Метод настройки объекта диапазона в VBA путем добавления и удаления строк и столбцов - PullRequest
Новая
       17

Метод настройки объекта диапазона в VBA путем добавления и удаления строк и столбцов

0 голосов
/ 19 апреля 2019

В моем приложении для Windows Excel мне часто приходится настраивать объекты диапазона, добавляя и удаляя строки и столбцы. Я не мог найти метод, который бы упростил эту общую задачу. Я не пытаюсь изменить данные; Я пытаюсь настроить диапазон объекта. Примерно так: 

Dim r As Range, s As Range
Set r = Range("B2:C3")     ' r is a 4-cell range object at B2
Set s = r.AdjustMe(OffsetRows:=-1,OffsetColumns:=2,Columns:=+2,Rows:=+3) ' s is now a 20-cell range at D1
Set s = s.AdjustMe(Rows:=-4) ' s is now a single row reference

1 Ответ

1 голос
/ 19 апреля 2019

Я думаю, вы просто хотите что-то вроде: 

dim r as long, rp as long, c as long, cp as long, rng as range
r = 1  'initial row  
c = 1  'initial column
rp = 2  'rows plus, the offset you want to work with
cp = 2  'colums plus, the offset you want to work with
set rng = cells(r,c).resize(rp,cp)
...