Função LOF
Devolve um Valor Longo que representa o tamanho, em bytes, de um ficheiro aberto através da instrução Abrir .
Sintaxe
LOF(filenumber)
O argumentofilenumber necessário é um Número Inteiro que contém um número de ficheiro válido.
Observação
Utilize a função FileLen para obter o comprimento de um ficheiro que não está aberto.
Exemplo
Este exemplo utiliza a função LOF para determinar o tamanho de um ficheiro aberto. Este exemplo pressupõe que TESTFILE
se trata de um ficheiro de texto que contém dados de exemplo.
Dim FileLength
Open "TESTFILE" For Input As #1 ' Open file.
FileLength = LOF(1) ' Get length of file.
Close #1 ' Close file.
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.