Run-time Error 1004

[captainnaptown]

I get this Method rang of object _global failed error at this section of the code.
Set rRangeCheck = Range(WsNameStr & "!" & NameStr)
namestr is lockedversion