En VBA (Visual Basic for Applications), las funciones LTrim, RTrim y Trim se usan para eliminar espacios al principio y al final de una cadena de texto.

Aquí tienes un resumen de cada una:

• LTrim(string): Devuelve una cadena con los espacios iniciales (a la izquierda) eliminados.
• RTrim(string): Devuelve una cadena con los espacios finales (a la derecha) eliminados.
• Trim(string): Devuelve una cadena con los espacios iniciales y finales eliminados.

Ejemplos de cómo usar estas funciones en VBA

Sub TrimExamples()

    Dim originalString As String
    Dim resultString As String
    
    originalString = "    Texto con espacios al principio y al final.    "
    
    ' Eliminar espacios al principio
    resultString = LTrim(originalString)
    Debug.Print resultString  ' Resultado: "Texto con espacios al principio y al final.    "
    
    ' Eliminar espacios al final
    resultString = RTrim(originalString)
    Debug.Print resultString  ' Resultado: "    Texto con espacios al principio y al final."
    
    ' Eliminar espacios al principio y al final
    resultString = Trim(originalString)
    Debug.Print resultString  ' Resultado: "Texto con espacios al principio y al final."

End Sub

Usa la ventana Inmediato (Immediate Window) en el Editor de VBA para ver los resultados de Debug.Print. Si necesitas trabajar con estas funciones directamente en un documento Excel, puedes utilizarlas en fórmulas o asignar el resultado a una celda:

Sub TrimToSheetCell()

    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("Sheet1")
    
    ' Asumamos que la celda A1 tiene un texto con espacios
    ws.Range("B1").Value = Trim(ws.Range("A1").Value)
    ws.Range("C1").Value = LTrim(ws.Range("A1").Value)
    ws.Range("D1").Value = RTrim(ws.Range("A1").Value)

End Sub

Este ejemplo lee el valor de la celda A1, le aplica las funciones Trim, LTrim y RTrim respectivamente, y coloca los resultados en las celdas B1, C1, y D1.

Recuerda siempre que estas funciones solo eliminan espacios en blanco y no otros caracteres como tabulaciones o saltos de línea.

Conoce nuestra tienda

Ver más productos

Mejora tu nivel y logra tus objetivo

Excel

Access

Power BI

Ayúdanos a hacer crecer el proyecto