Como contar las lineas de un archivo txt

Hola, me podrías indicar como hago para contar el numero de lineas que tiene un archivo txt.

1 respuesta

Respuesta
1
Añade una referencia a:
"Microsoft Scripting Runtime"
'Declara esto
Dim fs As FileSystemObject
Dim ts As TextStream
'...
Set fs = New FileSystemObject
'abre el archivo para "añadir"
Set ts = fs.OpenTextFile("C:\ejemplo.txt", ForAppending, False, TristateUseDefault)
'lo importante, te dará el número de lineas de un archivo de texto
Ts. Line

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas