Выберите отдельные ячейки с нотацией r1c1 в команде .Range - PullRequest
0 голосов
/ 25 августа 2018

Я пытаюсь выбрать отдельные клетки с нотацией r1c1, но я не знаю как, и до сих пор я нашел, как это сделать. Чего я хочу добиться, так это

Sheets (1) .Range («A1, C1, F1, H1»). Выберите, но я хочу сделать это с нотацией r1c1.

Sheets (1) .Range (Ячейки (1,1), Ячейки (1,3) ...). Выберите, но с этим я могу только выбрать диапазон между ячейками и я не могу добавить больше чем два без ошибки

есть ли способ сделать это с помощью команды range и нотации c1r1?

1 Ответ

0 голосов
/ 25 августа 2018

Используйте Союз:

With Worksheets("Sheet1") 'Change to your sheet name.
    Dim Rng as Range
    Set rng = Union(.Cells(1,1),.Cells(1,3),.Cells(1,6),.Cells(1,8))
    Debug.print rng.Address(0,0)
End With

Примечания:

  1. Всегда следует назначать происхождение всем объектам диапазона.
  2. Не рекомендуется использовать .Select. Этого можно избежать в 99% случаев. См .: Как избежать использования Select в Excel VBA
...