VBA - Rtrim

A função Rtrim remove os espaços em branco do lado direito da string.

Sintaxe

RTrim(String)

Exemplo

Adicione um botão e adicione a seguinte função.

Private Sub Constant_demo_Click()
   Dim var as Variant
   var =       "Microsoft VBScript           "
   msgbox("After Rtrim : " & RTrim(var))
End Sub

Quando você executa a função acima, ela produz a seguinte saída.

After Rtrim : Microsoft VBScript