FreeFile leírás
Visszaadja a következő érvényes ingyenes fájlszámot (egész).
FreeFile szintaxis
A VBA szerkesztőben beírhatja a „FreeFile (”) parancsot a FreeFile funkció szintaxisának megtekintéséhez:
A FreeFile függvény egy érvet tartalmaz:
Tartomány száma: [Opcionális] 0 (alapértelmezett) az 1-255 tartományban lévő fájl számának visszaadására. 1 a 256-511 tartományba tartozó fájl számának visszaadásához.
Példák az Excel VBA FreeFile funkciójára
Futtassa az alábbi kódot.
1234567891011121314151617 | FreeFile_Example ()Dim nIndex mint egészDim nFileNumber mint egészDim arrFileNumber (1-3) Egész számkéntNIndex esetén: 1-3nFileNumber = FreeFile 'Szerezd meg a nem használt fájlszámotarrFileNumber (nIndex) = nFileNumber' szám.Nyissa meg a "D: \ test" & nIndex & ".txt" fájlt, ha nFileNumber 'fájlként hozza létre.Írja be #nFileNumber, "A fájl fájlszáma" & nFileNumber 'Output text. "Következő nIndexNIndex esetén: 1-3Bezárás arrFileNumber (nIndex) 'Fájl bezárása.Következő nIndexEnd Sub |
Ez 3 fájlt hoz létre a D meghajtón.
test1.txt: „Ennek a fájlnak a száma 1”
test2.txt: „Ennek a fájlnak a fájlszáma 2”
test3.txt: „Ennek a fájlnak a száma 3”
Ez azt mutatja, hogy a FreeFile függvény 1, 2, 3 értéket ad vissza.