VBA - Recortar

La función Trim elimina los espacios en blanco iniciales y finales de la cadena de entrada dada.

Sintaxis

Trim(String)

Ejemplo

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

Private Sub Constant_demo_Click()
   var = "Microsoft VBScript"
   var =       "            Microsoft VBScript           "
   msgbox ("After Trim : " & Trim(var))
End Sub

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

After trim : Microsoft VBScript