使用excel

Question

我想创建一个包含内容的文本文件并将其保存在一个文件夹中，所有文件都是从Excel中的单元格数据生成的。 我有我希望从A1列中的数据创建的文件夹和文件名：A2180 我有内容我希望保存为B1列中的.doc或.txt文件：B2180，C1：C2180 因此，每行将保存为文本文件，其中列B和C中的内容位于脚本创建的单个文件夹中。 这可能吗， 非常感谢你。

Answer 1

试试这个：

Sub Macro2()

Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
Dim oFile As Object

rowMax = Cells(1, 1).End(xlDown).Row

For i = 1 To rowMax

    Set oFile = fso.CreateTextFile(Cells(i, 1))
    'Write column B
    oFile.WriteLine Cells(i, 2)
    'Write column C
    oFile.WriteLine Cells(i, 3)
    oFile.Close

    Set fso = Nothing
    Set oFile = Nothing

Next i

End Sub