Molti altri suggerimenti in altri numeri di ExcelTips trattano l’apertura, la lettura, la scrittura, l’aggiunta e la chiusura di file di testo da una macro.

Un altro comando associato ai file di testo sequenziali è il comando Seek. Se utilizzato su un file aperto, Seek posiziona il puntatore del file interno su un numero di carattere specifico nel file. Il seguente frammento di codice è un esempio di come viene utilizzato:

Open "DOSTEXT.DAT" for Input as #1 iFileLen = LOF(1)

Seek 1, iFileLen / 2

Queste righe di programma utilizzano la funzione LOF per determinare la lunghezza del file. L’ultima riga posiziona quindi il puntatore del file interno a metà del file. Tutte le successive operazioni di lettura o scrittura del file verranno eseguite da quella posizione.

È inoltre possibile utilizzare Cerca come funzione per determinare la posizione corrente all’interno di un file di testo. Questo è ciò che fa questo codice:

iCurPos = Seek(1)

Questo comando lascia il puntatore del file interno dov’era, ma imposta iCurPos su un valore che rappresenta il numero di caratteri del puntatore nel file. Il valore iCurPos è la posizione in cui avranno luogo tutte le successive operazioni di lettura e scrittura del file.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (2475) si applica a Microsoft Excel 97, 2000, 2002 e 2003. Puoi trovare una versione di questo suggerimento per l’interfaccia a nastro di Excel (Excel 2007 e versioni successive) qui:

Using Seek In a Macro.