A função VBA RTRIM retorna uma string após remover os espaços à direita da string.
RTrim(texto)
Remova os espaços apenas do lado direito da linha:
Sub RTrimExample()
MsgBox RTrim(" test") 'Retorna: " test"
MsgBox RTrim("test ") 'Retorna: "test"
MsgBox RTrim(" test ") 'Retorna: " test"
MsgBox RTrim(" test test ") 'Retorna: " test test"
End Sub