Power Query+VBA制作产品信息查询工具

2021-09-07 16:22:31 浏览数 (1)

先看动画演示效果:

C列变更货号,点击D列可以自动弹出该产品对应的信息。实现该功能有三个核心要点:

首先,Power Query单条件查询检索数据,即按照输入的单一货号从产品资料中找到该货号的所有信息。

其次,将该货号的所有信息聚合为一个数据类型,以便按照需求选择显示相应的字段。

最后,Power Query无法自动识别货号信息变更,因此使用VBA自动刷新。下面进行详细说明。

1.设立单条件检索功能


(1)将准备好的产品资料表导入Power Query

(2)新建一个表,如下图所示,取名为“查询条件”,也导入Power Query

(3)在Power Query后台鼠标右键,对“查询条件”进行深化

深化后,查询条件的图标发生了变化:

(4)选择“产品资料”查询,任意筛选一个货号,自动生成一段代码,将代码中的该货号名称变更为“查询条件”

(5)添加自定义列,如下图命名,以便后续显示界面使用

以上即完成了单一货品条件的筛选。

2.创建数据类型


为在Excel界面悬浮展示产品信息,我们需要在Power Query中创建数据类型。

选中“产品资料”查询的所有字段,在“转换”选项卡下创建数据类型:

在弹出的对话框中按自己喜好命名名称,显示列为上一步骤新建的列名称:

以上完成后“产品资料”查询只显示一列,关闭并上载数据到Excel中:

3.自动刷新


默认情况下,每次变更货号,需要如下图方式手动刷新产品资料信息,非常不方便。

在查询界面工作表输入以下VBA代码,即可变更货号自动刷新:

代码来源:施阳老师 https://pqfans.com/2402.html

以上,我们即完成了产品信息查询工具。需要说明的是,第二个步骤需要Excel的版本是365最新版。如果是其它版本的Excel可跳过此步骤,使用其它方式显示结果。

vba

0 人点赞