2012-07-16 14 views
13

Dire se ho una colonna di numeri (quanti di essi potrebbero variare, ma potrebbe essere ovunque tra 1000 e 10000) e vorrei leggerli tutti in un array in VBA, qual è il modo più veloce per farlo?Il modo più veloce per leggere una colonna di numeri in un array

Ovviamente posso creare un array di dimensioni 10000 e fare un ciclo for/while, ma esiste un modo più veloce di questo?

risposta

15

Ti piace questo?

Dim Ar as Variant 

Ar = Sheets("Sheet").Range("A1:A10000").Value 

Se non si conosce l'ultima riga allora si può trovare l'ultima riga usando this e quindi utilizzare il codice di cui sopra come

Ar = Sheets("Sheet").Range("A1:A" & LRow).Value 
+0

In questo caso Ar è un oggetto di intervallo, ma non un array in VBA .... – AZhu

+6

È un array. –

+0

Fogli ("Foglio"). Intervallo ("A1: A10000"). Valore lavorato – AZhu

Problemi correlati