Добрый день.
Вопрос такой.
Несколько листов, допустим имена Лист1 и Лист2
UserForm1.show(modal)
Sheets(ActiveSheet.name).Select ' Активный Лист1
Application.DisplayAlerts = False
ActiveWindow.SelectedSheets.Delete
далее ActiveSheet.name меняется на Лист2
Но при попытке выделить ячейку ничего не выходит:
Вот эти три варианта не прокатывают:
Ошибки не выдает, но на ячейку не сдвигается..... а очень надо... кто сталкивался?

Cells(1, 1).Select
Sheets(ActiveSheet.name).Cells(1, 1).Select
ActiveWorkbook.ActiveSheet.Cells(1, 1).Select