Função replace

Buenas!

Preciso substituir as quebras de linha manuais ao final de um campo [observacao] tipo memorando.
Alguns usuários pressionam a tecla de quebra de linha várias vezes ao final do texto digitado.
A substituição funciona quando excluo todas as quebras de linha, em qualquer posição do texto.

                .Execute "UPDATE TabObservacao SET [observacao]=Replace([observacao],chr(10), '');"

mas, não consegui excluir somente as que estão ao final do texto.
tentei isso :

                 .Execute "UPDATE TabObservacao SET [observacao]=Replace(right([observacao],1),chr(10), '');"

mas assim limpa o campo todo.

Código completo:

Public Function ReplaceObservacao()
 Dim BD As Database

 Set BD = CurrentDb
 
       With BD
       .Execute "UPDATE TabObservacao [observacao]=Replace([observacao],chr(10), '');"
 
     End With
 
End Function


Alguem tem a solução?

Olá, tente com a função Trim (ela remove os espaços a direita e a esquerda)
ou RTrim( Remove os espaços a direita)

.Execute "UPDATE TabObservacao [observacao]=Trim([observacao]);"

se não der certo, poste seu banco aqui para darmos uma olhada ok

Obrigado pela atenção e, de fato, a função RTRIM remove os espaços em branco, mas preciso remover as quebras de linha manuais, que estão ao final (direita) do texto.

estranho, no meu Access, no campo memorando, coloco mais linhas vazias e ele deleta sozinho as linhas

envie seu bando de dados zipado para darmos uma olhada