Share via


Fechar instrução

Conclui a E/S (entrada/saída) em um arquivo aberto usando a instrução Open .

Sintaxe

Fechar [ filenumberlist ]

O argumento opcional filenumberlist pode ser um ou mais números de arquivo que usam a seguinte sintaxe, em que o número de arquivo é qualquer número de arquivo válido: [[ # ] filenumber ] [ , [ # ] filenumber ] . .

Comentários

Se você omitir a lista de números de arquivos, todos os arquivos ativos abertos pela instrução Open serão fechados.

Quando você fecha arquivos que foram abertos para Saída ou Anexo, o buffer final da saída é gravado no buffer do sistema operacional para esse arquivo. Todo o espaço de buffer associado ao arquivo fechado é liberado.

Quando a instrução Fechar é executada, a associação de um arquivo com o número de arquivo termina.

Exemplo

Este exemplo usa a instrução Fechar para fechar todos os três arquivos 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.