-1
我需要從電子表格創建多個文件。 Spread工作表包含第三個單元格中的名字,姓氏和一些信息。我的問題是如何創建文件的每一行文件將被命名爲名字+姓氏。如何從excel中創建新文件,文件名爲2個單元格的單元格中的每一行
非常感謝你提前!
我需要從電子表格創建多個文件。 Spread工作表包含第三個單元格中的名字,姓氏和一些信息。我的問題是如何創建文件的每一行文件將被命名爲名字+姓氏。如何從excel中創建新文件,文件名爲2個單元格的單元格中的每一行
非常感謝你提前!
如果第一個名字是A列中,而最後的名字是B列中,您可以使用此:根據需要
Sub test2()
Dim i&, lastRow&
lastRow = Cells(Rows.Count, 1).End(xlUp).Row
For i = 1 To lastRow
Workbooks.Add
ActiveWorkbook.SaveAs ("C:\Users\[user name]\Desktop\" & Cells(i, 1) & " " & Cells(i, 2) & ".xls")
ActiveWorkbook.Close
Next i
End Sub
更改文件路徑和擴展。我將它保存在名稱FirstName LastName.xls
中。每下面的評論
編輯:
要新建一個文本文件,並與C列的內容填充,使用下面(thanks to @Ben)
Sub create_TXT()
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
Dim oFile As Object
Dim i&, lastRow&
lastRow = Cells(Rows.Count, 1).End(xlUp).Row
For i = 1 To lastRow
Set oFile = fso.CreateTextFile("C:\Users\[user name]\Desktop\" & Cells(i, 1) & " " & Cells(i, 2) & ".txt")
oFile.WriteLine Cells(i, 3).Value
oFile.Close
Next i
Set fso = Nothing
Set oFile = Nothing
End Sub
HI,TNX這樣一個快速的答案,我能再問你一個問題?如果我想將單元格C中的信息放入文件中,那麼它將是單元格A,單元格B將是該文件的名稱,單元格C將是該文件的內容。那可能嗎?非常感謝! – VladimirB
@VladimirB - 這絕對有可能,但它會變得更技術化一點。如果有信息。在單元格C中,你想在哪裏去新文件?單元格A1?單元格C1? etc ... – BruceWayne
嗨,對不起,我的問題沒有說清楚,有可能該文件是.doc或.txt,以便單元格C的內容可以作爲內容。我明白這是技術性的和困難的。非常感謝你的幫助!! – VladimirB