x = Test
sh.Cells.Replace(What:=x,....

Don't use quote marks on variables.

"ordnance1" wrote in message
...
Is there any way to make the What:="" be a variable? So if the variable =
Test then the replace code would look for Test.



Cells.Replace What:="", Replacement:="", LookAt:=xlWhole, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False