作者:乔山办公网日期:
返回目录:excel表格制作
你可以传个简单的图例,含原始数据及完成版数据
假设文件A只有一行内容(以A.txt为例)
set /p wb=<A.txt
>B.txt echo %wb:~,100%
当然VBA 咯。,。。。
跨工作薄, 公式引用什么的, 很容易出错。
需要的话 +
实际就是通过zhidaoEXCEL读取,类似这种,把TXT文件(B文件)读入内存,并把需要的根据条件(A文件内)写入EXCEL表格(容C文件)
Sub ctxt() '读取多个选中的TXT中的内容写入到EXLCE
dim i%
FilesToOpen = Application.GetOpenFilename("文本文件(*.txt),*.txt", MultiSelect:=True, Title:="要统计的文件")
For Each Files In FilesToOpen
Open Files For Input As #1
i = 1
Do
Input #1, a
If Len(a) > 0 Then
Cells(ActiveSheet.Cells(65536, i).End(xlUp).Row + 1, i) = a
i = i + 1
End If
Loop While Not EOF(1)
Close #1
Next
End Sub