Ajuda do LibreOfficeDev 27.2
Substitui uma cadeia de caracteres por outra.
Replace (Expression As String, Find As String, Replace As String [, Start = 1 [, Count = -1 [, Compare = True]]]) As String
String
Expressão: Qualquer expressão de cadeia de caracteres que pretenda modificar.
Expressão: Qualquer expressão de cadeia de caracteres que pretenda modificar.
Substituir: Qualquer expressão de cadeia de caracteres que deva substituir a cadeia de caracteres encontrada na pesquisa.
Início: Expressão numérica opcional que indica a posição do carácter onde a pesquisa começa e também o início da subcadeia a ser devolvida.
Contagem: Número máximo opcional de vezes que a substituição deve ser realizada. Quando definido como -1, são realizadas todas as substituições possíveis.
Comparar: Expressão booleana opcional que define o tipo de comparação. O valor deste parâmetro pode ser True ou False. O valor predefinido True especifica uma comparação de texto que não distingue maiúsculas de minúsculas. O valor False especifica uma comparação binária que distingue maiúsculas de minúsculas. Também pode utilizar 0 em vez de False ou 1 em vez de True.
MsgBox Replace ("aBbcnnbnn", "b", "$", 1, 1, False) 'retorna "aB$cnnbnn"
REM sendo que: "b" deveria ser substituído, mas
REM * apenas quando em minúsculas (compare=False), daí a segunda ocorrência de «b»
REM * apenas a primeira ocorrência (respeitando maiúsculas e minúsculas) (contagem=1)
MsgBox Replace ("ABCDEFGHI", "E", "*", 4)
A função REM devolve D*FGHI porque a pesquisa começa na posição 4, que é também o início da cadeia de caracteres devolvida.
MsgBox Replace("aBbcnnbnn", "b", "$£", compare:=False) 'retorna "aB$£cnn$£nn"
REM Substituir todos os «b» (contagem = -1) por «$£», respeitando as maiúsculas e minúsculas (compare=False), a partir da primeira letra (start=1)