Función VBA EOF

Descripción EOF

Devuelve el valor que indica si se ha llegado al final de un archivo (booleano).

Sintaxis EOF

En el Editor de VBA, puede escribir "EOF (" para ver la sintaxis de la función EOF:

La función EOF contiene un argumento:

Número de expediente: Cualquier número de archivo válido.

Ejemplos de la función EOF de Excel VBA

Para probar la función EOF, cree un archivo de texto “test.txt” en la unidad D. (D: \ test.txt) Suponga que el contenido del archivo es el siguiente.

123 a B C1 2 3xy z

Ejecute el siguiente código.

1234567891011 Sub Input_Fx_Example ()Dim strContent como cadenaDim MyCharAbra "D: \ test.txt" para ingresar como n. ° 1 'Abrir archivo.Hacer mientras no EOF (1) 'Bucle hasta el final del archivo.MyChar = Input (1, # 1) 'Obtiene un carácter.strContent = strContent y MyChar 'CírculoMsgBox strContentClose # 1 'Cerrar archivo.End Sub

Entonces, el resultado será el siguiente.

Aquí, se utilizó la función EOF para determinar que se alcanzó el final de un archivo.

Va a ayudar al desarrollo del sitio, compartir la página con sus amigos

wave wave wave wave wave