La función VBA REPLACE devuelve el número especificado de caracteres de una cadena de caracteres que comienza en el número de carácter especificado.
Replace(texto, buscar, reemplazar)
O
Replace(texto, buscar, reemplazar, iniciar, limitar, caso)
Realicemos varias sustituciones en la línea dada:
Sub ReplaceExample()
text = "www.moonexcel.com.ua"
'Reemplazo sencillo
MsgBox Replace(text, "excel", "sheets") 'Devoluciones: www.moonsheets.com.ua
'Reemplazo sin primeros caracteres
MsgBox Replace(text, "excel", "sheets", 5) 'Devoluciones: moonsheets.com.ua
'Sustitución especificando o no un límite en el número de sustituciones
MsgBox Replace(text, "e", "E", 5) 'Devoluciones: moonExcEl.com.ua
MsgBox Replace(text, "e", "E", 5, 1) 'Devoluciones: moonExcel.com.ua
'Reemplazo con o sin estuche
MsgBox Replace(text, "EXCEL", "sheets") 'Devoluciones: www.moonexcel.com.ua
MsgBox Replace(text, "EXCEL", "sheets", , , 1) 'Devoluciones: www.moonsheets.com.ua
End Sub