La Macro no Reconoce una Variable que esta definida en una Celda
Estoy creando una Macro que busque en varios libros una palabra y la reemplace por otra. Para ello define las variables. Unas variables que serán los valores buscados y unas variables que serán los valores reemplazados. Los valores de las variables están definidos en Celdas. El problema es que cuando ejecuto la macro esta no reconoce el valor de la celda y por lo cual no realiza la función. Ademas quisiera saber si es posible que una macro realice búsquedas de acuerdo al color de la celda en todas las filas de una hoja.
Cabe destacar que no soy un experto, solo un aficionado, por lo cual me disculpo por cualquier error básico jeje!
Dim insertar1, insertar2, insertar3 As String
insertar1 = Range("b8")
insertar2 = Range("b9")
insertar3 = Range("b10")
ChDir "C:\Mis Concursos"
Workbooks.Open Filename:="C:\Mis Concursos\ProjectVBA1.xlsx", _
UpdateLinks:=0
Sheets(Array("Colores", "Hoja3")).Select
Sheets("Colores").Activate
Cells.Replace What:="&insertar1&", Replacement:="Black", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Cells.Replace What:="insertar2", Replacement:="Black", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Cells.Replace What:="Insertar3", Replacement:="Black", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False