ho ancora un problema;
ho un elenco di dati disposti su 10 colonne, ma il numero di righe è molto elevato, oltre 300.000, ed excel 2003 dispone solo di 65536 righe.
ho pensato di dividere i dati in più fogli, sempre nella stesse colonne;
questi dati vengono aggiornati, importati, da un file.txt;
per un solo foglio ho usato il seguente codice:
- Codice: Seleziona tutto
Sub IMPORTA_dati()
Range("B65536").End(xlUp).Offset(1, 0).Select
Set PRIMA_CELLA_VUOTA = Selection
With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;E:\DATI\elenco.Txt", Destination:=PRIMA_CELLA_VUOTA)
etc....
per aggiornare tutti i fogli contemporaneamente ho inserito questo codice in un modulo, non nel foglio, ed ho inserito un ciclo for ..next
- Codice: Seleziona tutto
Sub IMPORTA_dati()
for i=1 to 5
worksheet(foglioi).select
Range("B65536").End(xlUp).Offset(1, 0).Select
Set PRIMA_CELLA_VUOTA = Selection
With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;E:\DATI\elenco.Txt", Destination:=PRIMA_CELLA_VUOTA)
etc...
next i
ma naturalmente non funziona.
è inutile sottolineare che le ricerche in tal senso non mi hanno dato risultati.
come devo modificare il codice?
grazie miko