Страницы: 1
RSS
Выбор листа для работы макроса
 
День добрый,
Имеется следующий код
Код
Sub даты()
Dim ws As Worksheet
Set ws = лист14
код код код
End Sub

В теле кода везде указан ws как лист для работы, меняется он раз в пару недель. Если ли возможность указывать лист при начале работы макроса без правки кода? В духе inputbox, но с выбором имеющихся листов в документе
 
Валерий Кишин, здравствуйте
Алгоритм
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
Код
Function GetWorksheet() As Worksheet
  Dim rg As Range
  Set rg = Application.InputBox("Выберите мышью любую ячейку на листе", "Выберите нужный лист", Type:=8)
  If Not rg Is Nothing Then Set GetWorksheet = rg.Parent
End Function
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Страницы: 1
Наверх