Fechar instrução
Conclui a entrada/saída (E/S) de um ficheiro aberto com a instrução Open .
Sintaxe
Fechar [ filenumberlist ]
O argumento de filenumberlist opcional pode ser um ou mais números de ficheiro que utilizam a seguinte sintaxe, em que filenumber é qualquer número de ficheiro válido: [[ # ] número de ficheiro ] [ , [ # ] número de ficheiro ] . . . .
Comentários
Se omitir filenumberlist, todos os ficheiros ativos abertos pela instrução Open serão fechados.
Quando fecha ficheiros abertos para Saída ou Acréscimo, a memória intermédia final da saída é escrita na memória intermédia do sistema operativo desse ficheiro. Todo o espaço na memória intermédia associado ao ficheiro fechado é libertado.
Quando a instrução Fechar é executada, a associação de um ficheiro com o respetivo número de ficheiro termina.
Exemplo
Este exemplo utiliza a instrução Fechar para fechar os três ficheiros abertos para Saída.
Dim I, FileName
For I = 1 To 3 ' Loop 3 times.
FileName = "TEST" & I ' Create file name.
Open FileName For Output As #I ' Open file.
Print #I, "This is a test." ' Write string to file.
Next I
Close ' Close all 3 open files.
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.