Función Array
Devuelve un tipo Variant que contiene una matriz.
Sintaxis
Array(arglist)
El argumentoarglist necesario es una lista delimitada por comas de valores que se asignan a los elementos de la matriz contenidos en variant. Si no se especifican argumentos, se crea una matriz de longitud cero.
Observaciones
La notación usada para hacer referencia a un elemento de una matriz consta del nombre de la variable seguido de un paréntesis que contiene un número de índice que indica el elemento deseado.
En el ejemplo siguiente, la primerainstrucción crea una variable denominada A como tipo Variant. La segunda instrucción asigna una matriz a la variable A. La última instrucción asigna el valor contenido en el segundo elemento de la matriz a otra variable.
Dim A As Variant, B As Long, i As Long
A = Array(10, 20, 30) ' A is a three element list by default indexed 0 to 2
B = A(2) ' B is now 30
ReDim Preserve A(4) ' Extend A's length to five elements
A(4) = 40 ' Set the fifth element's value
For i = LBound(A) To UBound(A)
Debug.Print "A(" & i & ") = " & A(i)
Next i
El límite inferior de una matriz creada con la función Array está determinado por el límite inferior especificado con la instrucción Option Base, a menos que Array esté cualificada con el nombre de la biblioteca de tipos (por ejemplo, VBA.Array). Si está cualificada con el nombre de la biblioteca de tipos, Array no se verá afectada por Option Base.
Nota:
Un tipo Variant que no se declara como una matriz puede contener una matriz. Una variable Variant puede contener una matriz de cualquier tipo, excepto cadenas de longitud fija y tipos definidos por el usuario. Aunque un tipo Variant que contiene una matriz es conceptualmente diferente de una matriz cuyos elementos son de tipo Variant, se obtiene acceso a los elementos de matriz de la misma forma.
Ejemplo
En este ejemplo se usa la función Array para devolver una Variant que contiene una matriz.
Dim MyWeek, MyDay
MyWeek = Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun")
' Return values assume lower bound set to 1 (using Option Base
' statement).
MyDay = MyWeek(2) ' MyDay contains "Tue".
MyDay = MyWeek(4) ' MyDay contains "Thu".
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.