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