Друзья, всем привет!
Помогите, пожалуйста, решить проблемку. Указанный ниже макрос срабатывает, но результат не достигается, обрываясь на вставке значений из столбца X в столбец Z.

Sub Макрос12()
'
' Макрос12 Макрос
'

'
   Sheets("Techlist").Visible = True
   Columns("X:X").Select
   Selection.Copy
   Columns("Z:Z").Select
   Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
       :=False, Transpose:=False
   Columns("Z:Z").Select
   Application.CutCopyMode = False
   ActiveSheet.Range("$Z$1:$Z$1602").RemoveDuplicates Columns:=1, Header:=xlNo
   Sheets("Techlist").Select
   ActiveWindow.SelectedSheets.Visible = False
End Sub