У меня есть главный рабочий лист и несколько дубликатов (в основном они имеют одинаковый макет, но разные даты для каждого листа) Я пытаюсь разрешить пользователю вводить что-то на мастер, а затем открыть поле ввода и позволить пользователю выберите несколько листов (вкладок) и скопируйте эти данные на выбранные вкладки.
Не могу понять, как разрешить пользователю выбирать одну или несколько вкладок, а затем передавать данные из мастер-копии в то же место на этих вкладках.
Dim rng As Range
Dim tabs As Range
Sheets("MONTH").Select
Set rng = Application.InputBox(Prompt:="Select the cell(s) to copy", Type:=8)
Range(rng.Address).Select
Selection.Copy
Set tabs = Application.InputBox(Prompt:="Select the Tabs to copy", Type:=8)
For Each tabs In ActiveWindow.SelectedSheets
MsgBox tabs.Name
Next tabs
'Sheets("d31").Activate
Worksheets(tabs).Select
Range(rng.Address).Select
ActiveSheet.Paste
Application.CutCopyMode = False