excel中，“文件”“另存为”，格式选用“文本文件 （制表符分隔）”即可
CW = ActiveSheet.UsedRange.Columns.Count For I = 1 To CW Open "D:\" & Chr(Asc("A") + I - 1) & "行.txt" For Output As 1 For J = 1 To RW Print #1, Range(Chr(Asc("A") + I - 1) & CStr(J)).Value Next J Close 1 Next I MsgBox "数据导出完毕!", vbOKOnl...
打开需要导入到Excel中的文本文档查看数据,确认数据无误。 在Excel中单击''数据''标签,接着在''获取外部数据''选项组中单击''自文本''按钮。 在打开的''导入文本文件''对话框中找到并选中需要导入的文本文件。 单击''导入''按钮,即可将文本文档中的数据导入到Excel工作表中。 如果导入到Excel之前,在文本文档中...
直接导出，然后，在记事本里，ctrl+h，将空格替换为空白。