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