Teniendo este codigo como puedo introducir var a un array...

[ypsilon]

Range("B2").Select
Do Until IsEmpty(ActiveCell)
ActiveCell.Offset(1, 0).Select
Loop

Estoy atrancado en ello y no logro asignar el contenido de cada celda a un array de...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Cacho R]

No está muy bien explicada tu necesidad...

Sin embargo podría sugerirte -inicialmente- que intentes con:
miArray = WorksheetFunction.Transpose(Range("C3:C7"))

o...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí