Código VBA para que al hacer un reemplazar solo se ejecute en la hoja actual

Necesito su ayuda para hacer una macro que me remplace "1=" por "=" pero solo en las celdas seleccionadas.

Range("A7:CC7").Select
Application.CutCopyMode = False
Selection.Replace What:="1=", Replacement:="=", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

Nota: Actualmente el código me funciona bien, pero si anets de ejecutar la macro ya se intento reemplazar manualmente y se dejo la opción de "En este libro" en vez de "ene esta hoja", entonces al ejecutar la macro esa opción seguirá activa.

La pregunta es cómo hago en VBA para que al ejecutar un reemplazar solo se aplique a la hoja actual "Sheet"

Añade tu respuesta

Haz clic para o