关于查找替换锁定范围求大神不吝赐教

就是一个工作簿里面好几个工作表，我需要把母工作表里的数据进行标识然后复制到新表里，在新表里把这个标识去掉，我用的查找替换自己录的宏，如果之前没有操作，默认查找范围是工作表，不会出问题，但如果不小心之前在excel里用过查找而且范围是工作簿的话，一下就把母工作表里的标识也给替换掉了，怎么样才能锁定查找替换的范围在当前工作表呢，这个问题困惑了我好久，每次运行宏之前都要看一下查找范围是不是工作簿，有没有什么好的方法来解决这个问题，求大神们赐教。
Sub ??1()
Cells.Replace What:="1223", Replacement:="哈哈哈", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
End Sub
把这段代码的运行范围改为当前工作表……