VBA - Rtrim

La función Rtrim elimina los espacios en blanco del lado derecho de la cadena.

Sintaxis

RTrim(String)

Ejemplo

Agregue un botón y agregue la siguiente función.

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

Cuando ejecuta la función anterior, produce la siguiente salida.

After Rtrim : Microsoft VBScript