La función Mid en VBA (Visual Basic for Applications) se utiliza para extraer un número específico de caracteres de una cadena de texto empezando en la posición que tú especifiques.

Sintaxis básica

Mid(string, start, [length])

• string: es la cadena de texto de la cual quieres extraer los caracteres.
• start: es la posición en la cadena de texto donde quieres empezar la extracción. El primer carácter de la cadena tiene la posición 1.
• [length]: es el número de caracteres a extraer de la cadena de texto. Este argumento es opcional; si no se especifica, Mid extraerá todos los caracteres hasta el final de la cadena.

Ejemplo

Sub EjemploMid()
    Dim textoCompleto As String
    Dim subcadena As String
    Dim posicionInicio As Integer
    Dim cantidadCaracteres As Integer
    
    ' Asignamos el texto completo
    textoCompleto = "Hola mundo!"
    
    ' Especificamos desde qué carácter queremos empezar la extracción
    posicionInicio = 6
    
    ' Especificamos cuántos caracteres queremos extraer
    cantidadCaracteres = 5
    
    ' Usamos la función Mid para obtener la subcadena
    subcadena = Mid(textoCompleto, posicionInicio, cantidadCaracteres)
    
    ' Mostramos la subcadena en un cuadro de mensaje
    MsgBox subcadena  ' Esto mostrará "mundo"
End Sub

En el ejemplo, textoCompleto contiene la cadena «Hola mundo!», posicionInicio se establece en 6 para comenzar la extracción desde el sexto carácter, y cantidadCaracteres se establece en 5 para extraer los 5 caracteres siguientes a partir de la posición de inicio. El resultado que se mostrará será «mundo».

Recuerda que en VBA la indexación de cadenas comienza en 1, lo que significa que el primer carácter de la cadena es la posición 1, no 0 como en muchas otros lenguajes de programación.

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