用excel的VBA,如何实现从文件A中读取数据,在B文件中找到记录,写到文件C里,核心是要“跨文件”? 20
2个回答
展开全部
实际就是通过EXCEL读取,类似这种,把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
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询