¿Cómo utilizar la función VBA LBound Array? (con ejemplos)

Función Excel VBA LBound

LBound en VBA significa "Lower Bound", es decir, extraerá el número más bajo de una matriz. Por ejemplo, si la matriz dice "Dim ArrayCount (2 a 10) como cadena", entonces usando la función LBound podemos encontrar el menor número de la longitud de la matriz, es decir, 2.

A continuación se muestra la sintaxis de la función LBound. Es muy sencillo y sencillo; tiene solo dos parámetros.

Lbound (nombre de matriz (, dimensión))

• Nombre de matriz: este es el primer argumento. Para este parámetro, necesitamos especificar el nombre de la matriz, que se utiliza para definir la matriz.
• (Dimensión): si la matriz es de una sola dimensión, no es necesario. De forma predeterminada, se necesita uno, o de lo contrario debemos proporcionar el número de dimensión.

Entonces, usando estas funciones, podemos encontrar la longitud mínima de una matriz.

¿Cómo utilizar la función VBA LBound? (Ejemplo)

Ejemplo 1

Por ejemplo, mire el siguiente código.

Código:

Sub LBound_Example1 () Dim Count (2 a 5) Como entero MsgBox LBound (Count) End Sub

En el código anterior, hemos definido la matriz como un número entero y el tamaño de la matriz de 2 a 5. A continuación, hemos asignado el cuadro de mensaje VBA para mostrar la longitud más baja de la matriz utilizando la función LBound.

Cuando ejecutamos el código, obtendremos el siguiente resultado en un cuadro de mensaje.

Salida:

Dado que nuestra matriz comienza en 2, la función LBound determina la longitud más baja de la matriz como 2.

Ejemplo # 2

Ahora, mire el siguiente código.

Código:

Sub LBound_Example2 () Dim Count (5) As Integer MsgBox LBound (Count) End Sub

En lo anterior, no nos hemos decidido por el límite más bajo. Por el contrario, ahora proporcionamos la longitud de la matriz como 5. Ejecutemos el código y veamos la longitud más baja del valor.

Salida:

Ha devuelto el resultado como 0 porque cuando no decidimos el punto inicial y final de una matriz, proporcionamos el número estático, por ejemplo, "Cuenta (5), es decir, en este caso, el valor de la matriz comienza en 0, no desde 1. Entonces ahora podemos almacenar un total de 6 valores en él.

Contar (0), Contar (1), Contar (2), Contar (3), Contar (4), Contar (5).

Ejemplo # 3

Ahora usaremos el rango de datos y decidiremos el límite inferior del rango de datos. Por ejemplo, mire la siguiente imagen de datos.

De este rango, decidiremos el tamaño de fila más pequeño y más alto.

Primero, defina la variable como una variante.

Código:

Sub LBound_Example3 () Dim Rng como variante End Sub

Para esta variable de variante "Rng", establezca el valor de referencia del rango como "Rango (" B2: B5 "). Valor".

Código:

Sub LBound_Example3 () Dim Rng As Variant Rng = Range ("B2: B5"). Valor End Sub

Para este rango, encontraremos la longitud de matriz más baja y más alta. Abra el cuadro de mensaje y la función LBound y proporcione el nombre de la variable.

Código:

Sub LBound_Example3 () Dim Rng As Variant Rng = Range ("B2: B5"). Value MsgBox LBound (Rng) End Sub

Ahora ejecute el código VBA y vea el valor más bajo de la longitud.

Salida:

Ahora cambie la referencia de variable de B2: B5 a A2: B5.

Para este rango, encontraremos los valores de límite inferior y superior.

Código:

Sub LBound_Example3 () Dim Rng As Variant Rng = Range ("A2: B5"). Valor End Sub

Dado que tenemos más de una matriz de dimensiones, también debemos proporcionar el número de dimensión.

Código:

Sub LBound_Example3() Dim Rng As Variant Rng = Range("A2:B5").Value MsgBox LBound(Rng, 1) End Sub

To find the first column first lower bound above code will help, similarly to find the upper bound in this first column below code will help.

Code:

Sub LBound_Example3() Dim Rng As Variant Rng = Range("A2:B5").Value MsgBox LBound(Rng, 1) & vbNewLine & UBound(Rng, 1) End Sub

This will find the first column lower length and upper length. Similarly, in the next line, write one more message box but this time, change the dimension from 1 to 2.

Code:

Sub LBound_Example3() Dim Rng As Variant Rng = Range("A2:B5").Value MsgBox LBound(Rng, 1) & vbNewLine & UBound(Rng, 1) MsgBox LBound(Rng, 2) & vbNewLine & UBound(Rng, 2) End Sub

Run the code and see the result in the message box.

Output:

Para la primera dimensión, el límite inferior es 1 y el límite superior es 4.

Haga clic en "Aceptar" para obtener los límites de la siguiente dimensión.

Salida:

Para la segunda dimensión, el límite inferior es 1 y el límite superior es 2.

Cosas para recordar aquí

• La función LBound devuelve la longitud mínima de la matriz.
• Cuando la longitud de la matriz es estática, es decir, un solo número, la matriz siempre comienza desde el número 0, no desde 1.
• En el caso de una matriz multidimensional, necesitamos especificar el número de dimensión.