Запуск макроса с другого листа.

[Mag0G]

Макрос писался автозаписью с дальнейшей легкой обработкой напильником (Добавил With) алгоритм записи/работы описан выше.
Цель - "протянуть" несколько ячеек с формулами и удалить дубликаты получившихся значений. Ровно эту функцию он и выполняет, если я его запускаю с Лист2. Я хочу чтобы он и дальше работал только на Лист2, только с возможностью запускать его с любого другого листа (например с Лист1).

Если вы не знаете как мне помочь - прошу прощенье на потраченное на меня время, поищу помощи в другом месте.

[IgorGO]

не буду говорить за всех, а лично я с задачами такой сложности как Ваша, столкнулся впервые в жизни!

1. скопируйте себе в проект этот

Sub ПротянутьИУбратьДубликатыВЗаголовкахFromIgorGo()
With WorkSheets(2)
  .Range("B2:K2").AutoFill Destination:=.Range("B2:K6001")
  .Range("B2:K6001").FillDown
  .Range("$B$1:$K$6001").RemoveDuplicates Columns:=Array(1, 2, 3, 4, 5, 6 _
      , 7, 8, 9, 10), Header:=xlYes
End With
End Sub

2. откройте лист1
3. выполните только что скопированный макрос

[IgorGO]

найдите 10 отличий с тем, что предложил Вам Aleksandr H. в сообщении #2

[Mag0G]

Заработало!
Надо было давно научится от select-ов избавляться, может тогда и свое и чужое время сэкономил.
Спасибо за науку мил человек!

[Hugo121]

Да не, просто нужно было не игнорировать ответ. Кстати первый.