求VBA实现一个表格的产品搜索功能

帅帅糖爸 · 发表于 2024-9-13 18:03

原贴在这里
https://www.52pojie.cn/thread-1963773-2-1.html

我自己用AI写的文件在这里
https://wwjd.lanzout.com/i1FDJ29x8e5c

1、采购申请表
a. A列输入产品编码，后边对应显示产品信息（商品名称、规格型号、采购单位、单价、生产厂家、供应商）
b. 双击单元格（双击单元格范围B列，从第四行开始，最底下两行除外），弹出商品信息窗体

2、双击商品信息窗体的搜索结果，填入采购申请表，要求不能覆盖最底下两行的内容

@flyer_2001 @nikkyu

flyer_2001 · 发表于 2024-9-13 18:03

https://www.123pan.com/s/awGYjv-LGWrv?提取码:Aju0
出现#N/A 有可能是没找到或者产品资料的商品编码是数字形式的，后面会省略小数点后的0，改为文本型

flyer_2001 · 发表于 2024-9-13 23:17

在你的基础上改了下，你看下
https://www.123pan.com/s/awGYjv-uGWrv?提取码:UHBz

nikkyu · 发表于 2024-9-14 08:00

不知道你要干什么，我不是写好了吗？

帅帅糖爸 · 发表于 2024-9-14 08:00

flyer_2001 发表于 2024-9-13 23:17
在你的基础上改了下，你看下
https://www.123pan.com/s/awGYjv-uGWrv?提取码:UHBz

有时候会出现这样的情况，点击#N/A错误无法重新选取列表框的内容，报错，运行时错误13，类型不匹配：商品搜索.curText = Target.Value

另外
1、弹出框后，无法再操作表格
2、再向下增加内容时，滚动条不动，看不到增加了哪些

目前，除了这些，其他都完美

flyer_2001 · 发表于 2024-9-14 12:14

flyer_2001 发表于 2024-9-14 12:11
https://www.123pan.com/s/awGYjv-LGWrv?提取码:Aju0
出现#N/A 有可能是没找到或者产品资料的商品编码是数 ...

公式改了一下，查不到不显示#N/A

帐号		自动登录	找回密码
密码			注册[Register]

[其他求助] 求VBA实现一个表格的产品搜索功能

最佳答案

免费评分