VBA其实没你想象的那么难

时　间:2021-02-01 21:25:41
作　者:张志   ID：8  城市：上海  QQ：2851379730
摘　要:几年时间，员工工作有变动，要获得每个员工当前所在的部门及岗位。
正　文:

     前几天，一位Access爱好者说他有一个问题困扰了我好久，结合他遇到的问题，因此有了这篇文章和视频讲解，之所以文章的标题定为《VBA其实没你想象的那么难》，是因为在解决这个问题的过程中，由浅入深，一步一步引入了VBA，且立即可以学会，他遇到的问题如下：

一、目标：

      他从事人事管理工作，要从大量的工作变动数据中，找出当前每个人最新的部门和岗位，这里用的是模拟数据，大家思考一下，如下图所示：

二、素材下载：

    点击下载此附件

三、视频讲解

     共3个短视频，请搜索抖音号：accessMVP，视频分别为：

     获得最新部门及岗位（一）：通过鼠标拖动，双击两次查询，就达到想要的结果（这时的不足会发现，需要操作员去双击2次查询）

     获得最新部门及岗位（二）：通过 DoCmd.OpenQuery "查询的名称"，用一个按钮，只需要点击一次 (只需要记住  DoCmd.OpenQuery，显然很容易)

     获得最新部门及岗位（三）：通过复制查询中ACCESS自动生成的SQL代码，然后用 Docmd.Run “SQL代码”，然后把查询对象删除，全部用代码实现，也是点击一个按钮，就达到了目标

     以上三个视频，你会发现，当你给别人用第三个视频的方式展示你成果时，给人的感觉很高深的样子，而实质上呢，来自于第一个视频的简单操作，短短几分钟，你事实上已经使用上了VBA代码，也用上了SQL代码。一切都是那么容易，当你一个按钮实现了你想要的功能而不需要多次双击查询时，你会喜欢上VBA，不再畏难，VBA并没什么大不了的。