Excel VBA: как очистить выделение без активации листа

Question

Редактировать:

Не для очистки данных в выделении, а для удаления самого выделения. Я полагаю, это будет эквивалентно выбору другого диапазона, например, A1.

Answer 1

эм, вы всегда можете использовать VBA для ссылки на лист и диапазон ячеек?

Option Explicit

Sub RemoveValues()
  Worksheets("ACME_Sales").Range("A1:B17").ClearContents
End Sub

Это очистит ячейки от A1 до B17 на рабочем листе ACME_Sales.

ИЗМЕНЕНО Редактировать ответ, чтобы отредактировать отредактированный вопрос

Sub SelectNewCell()
  Worksheets("ACME_Sales").Select
  Range("E2:E2").Select
End Sub

Это позволит VBA удалить любой выбор в ACME_Sales, а затем просто выбрать ячейку E2.

Answer 2

Для списка рассылки вы можете все так сделать так

Sub test()

    ClearListRange sht, Range("PIVOTTABLEDATASOURCESSTART")

End Sub



Public Sub ClearListRange(sht as worksheet, Startrange As Range)

    sht.Range(Range(Startrange, Startrange.End(xlToRight)), Range(Startrange, Startrange.End(xlDown))).ClearContents


End Sub