Buscar..


Observaciones

VBA tiene funciones incorporadas para extraer partes específicas de cadenas, que incluyen:

  • Left / Left$
  • Right / Right$
  • Mid / Mid$
  • Trim / Trim$

Para evitar la conversión de tipo implícita en la cabecera (y, por lo tanto, para un mejor rendimiento), use la versión con el sufijo $ de la función cuando se pasa una variable de cadena a la función, y / o si el resultado de la función se asigna a una variable de cadena.

Pasar un valor de parámetro Null a una función $ -suffixed generará un error de tiempo de ejecución ("uso no válido de nulo"), esto es especialmente relevante para el código que involucra una base de datos.

Use Left o Left $ para obtener los 3 caracteres más a la izquierda en una cadena

Const baseString As String = "Foo Bar"

Dim leftText As String
leftText = Left$(baseString, 3)
'leftText = "Foo"

Use Right o Right $ para obtener los 3 caracteres más a la derecha en una cadena

Const baseString As String = "Foo Bar"
Dim rightText As String
rightText = Right$(baseString, 3)
'rightText = "Bar"

Use Mid o Mid $ para obtener caracteres específicos dentro de una cadena

Const baseString As String = "Foo Bar"

'Get the string starting at character 2 and ending at character 6
Dim midText As String
midText = Mid$(baseString, 2, 5)
'midText = "oo Ba"

Utilice Recortar para obtener una copia de la cadena sin espacios iniciales ni finales

'Trim the leading and trailing spaces in a string
Const paddedText As String = "    Foo Bar    "
Dim trimmedText As String
trimmedText = Trim$(paddedText)
'trimmedText = "Foo Bar"


Modified text is an extract of the original Stack Overflow Documentation
Licenciado bajo CC BY-SA 3.0
No afiliado a Stack Overflow