Sub aa()
Dim a,b As String
i = 2
Do
a = Cells(i, 1)
j = 2
Do
b = Cells(j, 2)
If b Like "" & a & "" Then
Cells(j, 3) = "EMS"
End If
j = j + 1
Loop Until Cells(j, 2) = ""
i = i + 1
Loop Until Cells(i, 1) = ""
End Sub
运行即可。
在EMS官方网站批量输入单号查询,一次可查询10个单号。
步骤:1 打开EMS官网,找到邮件查询下“速递查询”。
2 在批量邮件查询的框内输入要查询的单号,每行一个,可以一次查询10个单号,输入完成点击提交。
以上就是关于怎样在excel表格中提取我想要的数据全部的内容,包括:怎样在excel表格中提取我想要的数据、怎么打快递单、EXCEL遍访高手还没搞定这个问题,有想法的进来看看,多谢了等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)