注：文章内容来源于网络，真实性有待确认，请自行甄别。
excel批量导入数据在excel文件的第一列是“sd
发表于：2024-10-24 00:00:00浏览：5次
问题描述： 在文件的第一列是“sd-100101-1”等类似的数据，一个文本文件中的数据是“d:\123\sd-100101-1”等类似的数据。想把文本文件中的数据导入到excel中，同时与第一列中的数据匹配。例如，文本中的某一行内容是“ d:\123\sd-100101-2” ，在excel中第一列中有“sd-100101-2”，那么两者进行匹配，将“d:\123\sd-100101-2”放在“sd-100101-2”所在的那一列。
请高手指点，写出详细步骤或代码，感激不尽。
Sub 按钮1_单击()
mypath = ThisWorkbook.Path & "\": myfile = "abc123.txt"
On Error Resume Next
Open mypath & myfile For Input As #1
stk = Split(StrConv(InputB(LOF(1), #1), vbUnicode), vbCrLf)
Close #1
For i = 0 To UBound(stk)
Set rng = Columns(1).Find(what:=Split(stk(i), "\")(2), lookat:=xlWhole)
If Not rng Is Nothing Then Cells(rng.Row, 2) = stk(i)
Next
End Sub
猜你喜欢
- ppt在插入图片时出现无法插入的问题在插入时，图片文件夹打开后，
- 在插入时，文件夹打开后，出现图片文件不能正常显示，选定一个图片文件后就出现PowerPoint 停止工作较长时间，进而自动退出的现象，不知如何解决。
- EXCEL中如何打印字体颜色，却不打印单元格背景色？为了视觉上的
- 为了上的直观，我在电子表格中，对某些单元格使用了不同的背景色，但这些背景色只能在电子表格中被看见，而不能打印出来。 要解决这个问题很简单，只需要在页面设置中选择“单色打印”即可。 现在，我需要对一些文字改变颜色，并且需要打印出颜色来。如果启用了“单色打印”就不能将字体的颜色打印出来了。 甚至有的时候，在同一个单元格内，其背景色不需要打印出来，而文字的颜色则需要被打印出来。 请问，如何解决这个矛...
栏目分类全部>
推荐文章
- ppt在插入图片时出现无法插入的问题在插入时，图片文件夹打开后，
- excel表格中，怎么才能让项目永远保持在最上面，无论下来页面都?
- 为什么复制到word里的同样字体和大小的文字颜色会深浅不一？为什
- 网页在复制后经过word编辑时，发现里面有许多下箭头标记，请问怎?
- EXCEL中如何打印字体颜色，却不打印单元格背景色？为了视觉上的
- 请问.WORD里面打印时如何设置成隔页打印的模式啊?就是只打第一?
- 怎样使IF函数返回的值自动添加颜色?在使用EXCEL函数的时候,
- 把word中的带横杠的数字复制到excel中，为何变成了日期？使
- S上面加一横请问在Word里如何在英文字母S的上面加一横？除了用
- EXCEL单表格里想打多行可以吗单格里有没有类似于文档“回车键”