Hi Bob,


Sheets("test").Select
ActiveSheet.Unprotect Password:="your password"
ActiveSheet.Paste

Abdul Salam


-----Original Message-----
i am trying to copy to a range of unprotected cells in a
protected sheet.
the following will give an error after paste if
destination sheet is
protected.
what copy statement would work
thanks

' copy from data to test
Range("A1:P350").Select
Selection.Copy
Sheets("test").Select
Range("W8").Select
ActiveSheet.Paste

' add autofilter back
Range("W12:AL12").Select
Application.CutCopyMode = False
Selection.AutoFilter

End Sub


.