A função VBA REPLACE retorna o número especificado de caracteres de uma sequência de caracteres começando no número de caracteres especificado.
Replace(texto, localizar, substituir)
Ou
Replace(texto, localizar, substituir, iniciar, limitar, caso)
Vamos realizar várias substituições na linha fornecida:
Sub ReplaceExample()
text = "www.moonexcel.com.ua"
'Substituição simples
MsgBox Replace(text, "excel", "sheets") 'Retorna: www.moonsheets.com.ua
'Substituição sem primeiros caracteres
MsgBox Replace(text, "excel", "sheets", 5) 'Retorna: moonsheets.com.ua
'Substituição especificando ou não um limite no número de substituições
MsgBox Replace(text, "e", "E", 5) 'Retorna: moonExcEl.com.ua
MsgBox Replace(text, "e", "E", 5, 1) 'Retorna: moonExcel.com.ua
'Substituição com ou sem estojo
MsgBox Replace(text, "EXCEL", "sheets") 'Devoluções: www.moonexcel.com.ua
MsgBox Replace(text, "EXCEL", "sheets", , , 1) 'Retorna: www.moonsheets.com.ua
End Sub