Método CreateTextFile
Cria um nome de arquivo especificado e retorna um objeto TextStream que pode ser usado para ler ou gravar no arquivo.
Sintaxe
objeto. CreateTextFile (nome do arquivo, [ substituição, [ unicode ]])
O método CreateTextFile tem estas partes:
Sair | Descrição |
---|---|
objeto | Obrigatório. Sempre o nome de um objeto FileSystemObject ou Folder . |
Filename | Obrigatório. Expressão de cadeia de caracteres que identifica o arquivo a ser criado. |
Substituir | Opcional. Valor booliano que indica se um arquivo existente pode ser substituído. O valor será True se o arquivo puder ser substituído; False se não puder ser substituído. Se omitido, os arquivos existentes poderão ser substituídos. |
Unicode | Opcional. Valor booliano que indica se o arquivo é criado como um arquivo Unicode ou ASCII. O valor será True se o arquivo for criado como um arquivo Unicode; False se ele for criado como um arquivo ASCII. Se omitido, um arquivo ASCII será assumido. |
Comentários
O código a seguir ilustra como usar o método CreateTextFile para criar e abrir um arquivo de texto. Se o argumento de substituição for False ou não for fornecido, para um nome de arquivo que já existe, ocorrerá um erro.
Sub CreateAfile
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\testfile.txt", True)
a.WriteLine("This is a test.")
a.Close
End Sub
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.