使用excel中多行单元格数据的内容创建文件夹和文件

使用excel中多行单元格数据的内容创建文件夹和文件,excel,vba,Excel,Vba,我想创建一个包含内容的文本文件,并将其保存在一个文件夹中,所有这些文件都是从Excel中的单元格数据生成的。 我有一个文件夹和文件名,我想从列A1:A2180中的数据创建它 我想在B1:B2180、C1:C2180列中保存为.doc或.txt文件的内容 因此,每一行都将保存为文本文件,其中包含脚本创建的单个文件夹中B列和C列的内容。 有没有可能,, 提前非常感谢。试试这个: Sub Macro2() Dim fso As Object Set fso = CreateObject("Scrip

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

试试这个:

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

是的,这是可能的,但我们希望你先试试。如果您在实现这一点时遇到问题,那么请准确描述哪一部分让您感到困惑,包括您可能拥有的任何代码,即使它不起作用。