Método WorksheetFunction.Replace (Excel)

Substitui parte de uma cadeia de texto, com base no número de carateres que especificar, por uma cadeia de texto diferente.

Sintaxe

expressão. Substituir (Arg1, Arg2, Arg3, Arg4)

expressão Uma variável que representa um objeto WorksheetFunction .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Arg1	Obrigatório	String	Texto no qual você deseja substituir alguns caracteres.
Arg2	Obrigatório	Double	A posição do caractere em Arg1 que você deseja substituir por Arg4.
Arg3	Obrigatório	Double	O número de caracteres em Arg1 que você deseja que o método Replace substitua por Arg4.
Arg4	Obrigatório	String	Texto que substituirá caracteres em Arg1.

Valor de retorno

Um valor de Cadeia que representa a nova cadeia, após a substituição.

Exemplo

Este exemplo substitui abcdef por ac-ef e notifica o usuário durante o processo.

Sub UseReplace() 
 
 Dim strCurrent As String 
 Dim strReplaced As String 
 
 strCurrent = "abcdef" 
 
 ' Notify user and display current string. 
 MsgBox "The current string is: " & strCurrent 
 
 ' Replace "cd" with "-". 
 strReplaced = Application.WorksheetFunction.Replace _ 
 (Arg1:=strCurrent, Arg2:=3, _ 
 Arg3:=2, Arg4:="-") 
 
 ' Notify user and display replaced string. 
 MsgBox "The replaced string is: " & strReplaced 
 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.