求助，关于客户管理的。。怎么通过客户手机号确定客户。

yxyifei · 发表于 2013-1-6 13:51

我需要在sheet1里面，可以的话，一张userform，输入电话号码，sheet2 里面的所对应的客户资料就会在sheet 1 的userform里面出现，这个难吗，希望高手帮忙解答下。

niuhui2009 · 发表于 2013-1-6 14:04

不难，用VLOOKup或match都行

李甲 · 发表于 2013-1-6 14:20

用函数还是V呢

yxyifei · 发表于 2013-1-6 14:20

niuhui2009 发表于 2013-1-6 14:04
不难，用VLOOKup或match都行

能帮个做个吗，我看看code，因为是新上手，都不大懂，过两天就得交了。

ctp_119 · 发表于 2013-1-6 14:29

本帖最后由 ctp_119 于 2013-1-6 14:29 编辑

用index+match做的，具体情况请看附件

副本search.rar (11.65 KB, 下载次数: 48)

yxyifei · 发表于 2013-1-6 14:44

李甲发表于 2013-1-6 14:20
用函数还是V呢

用vlookup把。

ctp_119 · 发表于 2013-1-6 14:51

Sub 宏1()
Dim rng As Range
Dim str As Double
str = VBA.Val(InputBox("请输入要查询的电话号码：", "查询窗口"))
Set rng = Sheet2.Cells.Find(What:=str, After:=ActiveCell, LookIn:=xlValues, LookAt _
:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False)
rng.Offset(, -4).Resize(1, 4).Copy Range("a11")
rng.Offset(, 1).Resize(1, 4).Copy Range("e11")
End Sub

复制代码

ctp_119 · 发表于 2013-1-6 14:52

vba法，请看附件

yxyifei · 发表于 2013-1-6 14:53

ctp_119 发表于 2013-1-6 14:51

嗯，谢谢大哥，我再研究下，如果还有什么问题，再请教你。

		自动登录	找回密码
密码			免费注册

[讨论] 求助，关于客户管理的。。怎么通过客户手机号确定客户。