[Resolvido]Loop remover-apagar parte de uma palavra (string) de um campo na tabela

Prezados,

Achei na net uma função e fiz uma adaptações ao meu projeto, porém, tem uma campo em minha tabela chamado senhaAutorizacao e nele tem o seguinte registros 11-41754297. Como fazer para deletar o simbolo (-) da tabela?

Usei a função abaixo e somente remove o que está à direita ou à esquerda do simbolo (-).

Call RemoveTexto 'Chama a sub-rotina que remove os caracteres à esquerda


Public Sub RemoveTexto()
On Error Resume Next
Dim nENDERECO As String
Dim strTexto As String
Dim intPos As String
nENDERECO = senhaAutorizacao
intPos = InStr(nENDERECO, "-") 'Localiza a string a partir do primeiro caracter
strTexto = Trim(Mid(nENDERECO, intPos)) 'Remove a string à esquerda do simbolo
senhaAutorizacao = strTexto
End Sub

Olá Dilson,

Perfeito, funcionou que é uma maravilha.

Grato,

Agradecemos o feedBack.

Mudei o titulo para facilitar na ferramenta de buscas do fórum.

De: Deletar para da palavra na tabela.
Para: Loop remover-apagar parte de uma palavra (string) de um campo na tabela