Активировать лист Excel в VBA без перехода к рабочему листу

Question

Возможно ли активировать рабочий лист Excel из VBA, фактически не уходя с рабочего листа, с которого был запущен макрос?

Answer 1

Вы можете установить Application.ScreenUpdating собственности на false, а после выполнения вашей работы восстановите его до true.
Обратитесь к примеру: https://msdn.microsoft.com/en-us/library/office/ff193498.aspx

Answer 2

Да, вы можете непосредственно запустить нужный код в новом рабочем листе с помощью команды with

With Sheets("Sheet2") 'Sheet2 is the new sheet 
    Debug.Print .Range("A1") 
    'Run your desired code here. 
End With 

Answer 3

Да.

ThisWorkbook.Worksheets(2).Activate

Это сделает нужный рабочий лист можно установить в качестве активного. Обратите внимание: если вы не отключите Application.ScreenUpdating, как указано в другом ответе здесь, рабочие листы будут заметно перемещаться так, чтобы отображался активный рабочий лист.

Однако, я должен спросить, зачем вам нужно активировать рабочий лист? Если вы хотите запустить некоторые команды против клеток, расположенных на этом листе, вы можете сделать это без активации листа первого:

Dim ws As Worksheet 
Set ws = ThisWorkbook.Worksheets(2) 

ws.Range("A1").Value = "Hello world" 

Этот фрагмент кода будет вставлять «Привет мир» в клетку A1 на втором листе в вашей книге - не требуется активизация рабочего листа.