............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

Cómo cargar un Vector mediante vba

Ver el tema anterior Ver el tema siguiente Ir abajo

Cómo cargar un Vector mediante vba

Mensaje por oruiz el Sáb Nov 07, 2009 9:48 am

Agradezco a quien me pueda ayudar,

Tengo una columna de datos en excel y quiero cargar un vector con esta información. Cómo debo hacerlo?

Más o menos así:

A
1
3
7
9
12
10

Dim vector()
vector = range("A2:A7")

oruiz

Masculino Cantidad de envíos : 7
Edad : 50
Ciudad - Pais : Colombia
Version de Excel : 2007
Fecha de inscripción : 15/04/2009

Volver arriba Ir abajo

Re: Cómo cargar un Vector mediante vba

Mensaje por GalileoGali el Sáb Nov 07, 2009 9:55 am

Prueba con esto:
Código:
Option Base 1
Sub cargarArray()
Dim vector As Variant
vector = Range("A2:A7")
ReDim Preserve vector(Range("A2:A7").Rows.Count, Range("A2:A7").Columns.Count)
MsgBox vector(3, 1)

End Sub

o mejor aún

Código:
Sub cargarArray()
Dim vector As Variant
Dim RNG As Range
Set RNG = Range("A2:A7")
vector = RNG
With RNG
ReDim Preserve vector(.Rows.Count, .Columns.Count)
End With
MsgBox vector(3, 1)
End Sub

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1962
Edad : 61
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Re: Cómo cargar un Vector mediante vba

Mensaje por oruiz el Sáb Nov 07, 2009 11:02 am

GalileoGali,

Era lo que buscaba. Las dos soluciones son magníficas.

Muchas gracias

oruiz

Masculino Cantidad de envíos : 7
Edad : 50
Ciudad - Pais : Colombia
Version de Excel : 2007
Fecha de inscripción : 15/04/2009

Volver arriba Ir abajo

Re: Cómo cargar un Vector mediante vba

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.