VBA 创建.txt文本文件并写入内容（vba新建word并写入内容）

VBA中，`CreateTextFile` 是 `Scripting.FileSystemObject` 的一个方法，用于创建一个新的文本文件。它有两个参数：文件路径和文本编码。

以下是使用 `CreateTextFile` 创建新文本文件的示例：

```vba

Dim fso As Object

Set fso = CreateObject("Scripting.FileSystemObject")

'创建一个新文件

Dim filePath As String

filePath = "C:\Users\YourName\Desktop\output.txt"

Dim textFile As Object

Set textFile = fso.CreateTextFile(filePath, True)

' 写入到这个文件中

textFile.WriteLine "Hello, world!"

' 关闭文件

textFile.Close

Set textFile = Nothing

Set fso = Nothing

```

在这个示例中，我们首先创建一个 `Scripting.FileSystemObject` 对象。然后，我们使用 `CreateTextFile` 方法创建一个名为 `output.txt` 的新文本文件。我们将文件路径作为第一个参数传递，然后传递一个布尔值 `True` 作为第二个参数，表示我们要创建一个 Unicode 文本文件（如果传递 `False`，则会创建一个 ANSI 文本文件）。

然后，我们使用 `WriteLine` 方法将字符串“Hello, world!”写入文件。最后，我们使用 `Close` 方法关闭文件，并释放内存中的 `textFile` 和 `fso` 对象。