vb操作excel，没安装

wps 如何使用红功能？我们打开一个含有红的表格，提示为安装 vba 支持库，无法运行红开发工具按钮也是灰色的，我们来看一下官方解释。 第一种方式需要开通商业版才可使用，我们接着往下看。还有一种方式安装红安装包也可以实现， 我们来安装一下红安装包，一直点下一步，直到安装完成。 接着我们重启一下 wps， 这次已经可以成功运行红程序了， 里面的功能都可以使用，开发工具的按钮也可以用了。

excel 如何关闭 vb 功能？前往禁用 vba 红且不提供通知后，即可将 excel 的 vb 功能关闭了。具体步骤如下，方法一，通过 excel 选项关闭，打开 excel 文档，单击打开文件菜单， 单击选项，单击信任中心单击信任中心设置， 单击红设置，单击选中不提供通知，禁用 vba 红，再单击确定，再单击确定， 即可将 vb 功能关闭了。方法二，通过开发工具下的红安全性关闭，打开 excel， 单机展开开发工具选项卡， 单机红安全性，单机选中不提供通知，禁用 v b a 红，再单机确定，也可将 v b 功能关闭。

我们点击抽奖啊，他在不停的变化，然后我们啊停止，他就会出来一个结果啊，并且进行记录，然后我们第二次抽奖，那记录，第三次记录，第四次记录。 大家好，我是老吴，欢迎观看 exclvba 入门开窍课程。这节课我们来讲一个关于抽奖的案例，比如说我们随机循环一个五位数的这个数字，然后我们把抽奖的结果呢依次放到这里，我们来试一下，我们点击抽奖啊，他在不停的变化，然后我们 啊停止，他就会出来一个结果啊，并且进行记录，然后我们第二次抽奖，那记录，第三次记录，第四次记录。 ok， 好，那这个效果是如何完成的呢？好，我刚刚演示的时候呢，我们可以看到我设置的一个这个切换按钮，那我们今天讲解的就是 用这个切换按钮来做这个抽奖的这个代码。好，第一步我们要画一个切换按钮，我先把这个切换按钮删掉去 啊，先把它删除，然后我们通过这个地方啊，在开发工具里面插入，然后我们找到这个切换按钮 啊，然后我们这样绘制一下。好，然后我们双击这个切换按钮，就进入了代码的编辑界面，他默认的事件就是克利克事件，那我们就是要使用这个单机事件。好，然后我们就进行一个判断。好，首先我们判断这个 啊，叉勾八乘一切换按钮啊，他的这个 v 六啊， v 六就代表你是属于按进去还是属于这个弹出来啊，按进去的时候呢，他返回了这个 w 是 to， 弹起来就是他现在本身这个状态返回的 w 就是 fos 啊，如果 w 是 to 的话啊，我们就进行一个操作，反之 l 是 啊，就进行下一个操作，如果是处的话，就是说明我们已经把它点进去了啊，点下去之后我们就要进行抽奖了，那这个抽奖呢，就是涉及到一个五位数的一个随机，五位数的随机呢，我们可以用工作表函数， 就是用这个 round team， 好，五位数也就是一万啊，一万，然后最大的五位数呢，就是 九万九千九百九十九， ok， 我们把这个数字呢，把它给到这个单元格， 那这个单元格就是 b 二单元格啊， b 二单元格啊，这个单元格呢，它虽然是个合并单元格啊，但是呢这个地方你要输入值的话呢，你要看这个地方啊，这地方显示这个 b 二，那就是你往 b 二负值，那就是显示在这个区域里面。 ok， 我们现在得到的这个随机数呢，就给到了比尔，但是我们这个抽奖呢，它是处在一个不停循环的状态，所以呢我们肯定是要把这个写在一个循环里面， 那这个循环到底循环几次？这个是不固定的，他的时长也是不固定的，取决于我什么时候让他暂停啊，如果他不点暂停呢，就要不停的运行下去，所以呢我们用度循环是最好的啊，也就是让他无限循环。好，我们可以写的这个度 啊，路虎。然后它循环的这个截止的标志取决于什么呢？我们可以选择这个 啊，就是满足什么条件我才让这个循环随机出的这个东西截止啊，也就是我就简单一点，直接复制一下 啊，也就是这个值变成了 force 啊，就是以这个泰国巴特的值为六，当他变成 force 的时候才结束这个循环。 好，所以当我们点下去的时候，这个 v 六返回了处，他就开始不停的循环啊，当我们再次点击的时候，就是弹上来之后，他变成了 foss 啊，就结束循环，满足这个结束条件，他就不再循环。好，不， 在循环之后呢，我们就要把这个结果把它填到这个地方来，那就填到这个，从 m 三一直往下填，我们可以这样写啊，四 s， 然后热死点炕啊，从 m 列的最后一个单元格向上定位他的边界，那 m 列向上定位他的边界，然后呢？在 offset 啊，一行零列， 然后把这个 b 二的纸呢给到这个地方啊，这个 offset 呢，就是这样的啊，你上上定位之后呢，然后再放下来啊，如果你这个地方已经有数字了，那你从这个向上定位边界，然后再放到这个地方来啊，他是依次这样下来。 好，我们保存一下，我们可以来试一下啊，比如说我现在开始点击这个按钮啊，先把这个设计模式取消。好，他在变了啊，哎，但是我发现我现在 无法点击这个东西啊，已经卡死了，这个怎么办好，刚刚那个程序呢，他已经卡死掉了啊，所以呢，我们要在这个度循环里面呢，要写上一个，这个，读一本书。 好，这个的目的就是交还这个控制权啊，如果你不交还控制权呢，他就不停的循环啊，不让你去插手了啊，因为我们要人为干预啊，因为我们要把它弹起来啊，让他结束这个循环，所以我们要写上这个东西。好，我们可以再来试一下，好，点击啊，停， 就停住了，好，再来停啊，再来停。 ok， 那这个效果就完成了啊，然后我们还可以在座的更加完善一些。啊，这个名字呢，可以改一下啊，这个按钮的名字，我们在点击的时候呢，我就希望 他这个地方呢换下名字 啊，开不去。好，按下去的时候呢？暂停抽奖。 好，然后弹起来的时候呢，让它变成开始抽奖。 ok， 我们再来试一下。好，按下去时候，哎，暂停。好，我点，暂停，暂停，哎，然后又开始 啊，又暂停，开始，暂停，开始，暂停。 ok， 好了，那这节课呢，我们就讲到这里，感谢各位看官的支持，如果这个视频能帮助到你，请帮忙点赞、收藏、转发。我是老吴，关注我，下节课我们将学习新的内容。

好，我们来先说一下这个安装的问题啊，嗯，安装的问题呢，在我们在虚拟经里面讲啊，他们 到这，那么在没有安装之前呢，我们的这个 wps 和 ex 二里面什么都没有的啊，我们这个呢，直接在官网上下载啊，你直接搜 vb 代码助手或者说 ex 八八零，那么到我的官网上面的，你就会看到我的首页上面有这个软件地址， 直接啊双击就行了，或者说注意这个前提啊，先关闭这个三六零啊，三六零的话很多时候会阻止他写入注册表，因为我们插件必须要注册。 那么右键管理员身份运行啊，这是微音词，那么微音器里面呢？可能没有这个框哎，没关系，一样的啊，点四默认会安装在这个位置啊，你可以记下 这个位置，那么这个位置呢？你如果想改的话也可以改啊，你可以改到地盘，但是注意不要改到 c 盘的其他位置，如果你是要改到 c 盘的其他位置，你就不要改啊，你要改要么就改到地盘去啊，我们浏览一下，你直接可以改到地盘好，比如说我们这里把它改到地盘， 不要，千万不要直接改到 c 盘的这个 pro 吗？这个地方会安装不成功啊，我这里没有地盘，那我们这里就只是安装在这啊，默认就在这，没关系啊，那我们直接下一步啊，那我们这里已经存在啊，那么这是针对于老用户呢，你安装过以后，在升级的时候他会说已经存在啊， 已经存在的话，那么你如果要覆盖的话，就可以点击啊，这个地方已经存在，要安装他肯定是点四啊，那么点四，那么下一步到这都不要管，他到下一步 看到，那我这里他就会说检测到旧版的数据库，如果你有自己添加了代码的数据库的话，你就不要点覆盖，如果你没有，你希望用我最新的这个代码库覆盖，那么就点覆盖，我这里是 全新安装的话，他不会弹出这个，他会直接到后面去啊，那么你如果想覆盖就直接覆盖，如果不覆盖就会远用你前前面的这个代码啊。好，我们这是安装完成了以后，我们随便打开一个 excel 文件啊，好，这是非常二零一九， 那么在这个里面呢，我们进入到微杯好，进去的时候你会看到这个上面会弹出这个功能区啊，这是我们最显著的特征。那么安装成功的标志呢？就是有功能区和这个， 那么这有一个版本啊， office 二零一零六十四位，他可能没有这个功能区，但是他会有这个底下的这个啊，我们鼠标中间就会弹 出这么一个我的这个快捷的按钮啊，还有呢，在这个上面可以点代码管理，你会看到我们这个，哎，这是我们这个叫做代码助手的主体啊，管理功能的界面啊，在这，那么这个整个的就是安装啊。 嗯，那么在这个地方就不多说啊，那么他要卸载怎么办啊？然后卸载你可以两种方法，首先呢，你可以临时性，不用的话就把这个在外接程序里面啊，把这两个 确定你虽然，那么下次再打开的时候，他就不会去启动他，不会去启动他，那我们再打开一次看，那么这就是临时禁用他的时候啊，有时候他可能会跟别的东西有冲突，你不确定的话，你就先把它取消掉啊，下次要用的时候再加载，那么也可以啊， 那么也可以在这个里面来加载啊，你在这点加载，他会重新加载，那么这个效果也是一样的啊。呢，好了，那我们再看 wps 里面有没有用到啊？ wps 啊，这 wps 我们新建一个表格，那实际上不仅仅是表格，在文档里面也都可以用啊，我们在开发工具里面。 好好，你看这是 wps， 二零一九，那么他也是一样的，跟温度是一样的啊，那么都会出现这个对话框啊。 wps 这个地方有点奇怪啊，他当鼠标移到这边，他不会自动消失啊，他是不会自动消失，这个很怪异， 你必须点一个东西才能消失。那那那，那没办法，我也不知道 wps 这个其实是为什么好那，呃，至于具体操作，我们待会再说啊，那么这个其他的 是一样的啊，其他的是一样的，他这个操作也跟那个 ok 上面是一样。好，这里退出啊。嗯，我这个里面没有装别的，我这里只单独装那个一个线，那么在位的或者是这个， 嗯，奥德路克 cs 里面都是一样的，这这个位置都是一样的。在因为 vba 实际上这个供应的环境，他不是针对某一个啊，那么是微软给所有的支持他的东西一起弄的，那比如说我们在这个 wps 文字里面啊，这个，嗯，好，我们新建 文档，这是相当一个味的啊，那他这个里面也是有开发工具的，这是味道的啊，那么这就是相对 wps 的文档。好，你看这里面也是可以的， 他这也是可以的，这都是一样的。好，那我们这个关于安装这方面就是，那你要卸载了，直接到开始菜单里面去找到这个微杯代码助手。啊。好， 你看这个 win 十有个 bug 啊，他这里显示不出来。这个，他的那个，嗯，叫做卸载的那个按钮。啊。那没关系啊，那么在这呢，你可以直接找这个管理工具里面的。嗯，抽 程序卸载。在哪？在管理工具啊，控制面板里面吧。控制你面板里面卸载程序啊，卸载程序里面。这里有啊，这里找得到。有，直接点击卸载 好，可以把它全部卸载就 ok 了。啊，那这个安装就是到这里啊，非常简单啊。

大家好，我是老吴，欢迎观看 excelvb a 入门开窍课程。这节课是窗体空间的第四节课，我们在这节课学习如何制作一个登录界面。 ok， 首先来看下这个例子， 我双击之后呢，他打开了一个设置页面之后呢，很快就关闭了，然后弹出一个登录的这个窗体， 在窗体里面呢，设计到这个标签还有文本框啊，然后在这个命令按钮上面呢，哎，还有一些图片，如果不输入账号和密码，直接点登录呢，他，他会提示未输入账号。好，如果我输入 啊，随便一个账号点登录，他会显示账号不存在啊，我输入正确账号，然后点击呢，他会说密码错误啊，我再输入正确的密码啊，就可以登录了。 ok， 这节课呢，我们就来学习这个登录界面。好，我重新建一个工作部，从开头来完成这个案例。好，首先第一步可能是插入一个窗体 啊，这个穿体的大小呢，来调整一下啊，比如说登录界面呢，就这么大。 ok， 好，我们把它先放一张图片上去啊，这个图片呢，我已经 准备好了啊，这个地方啊，这些图片呢，大家也可以通过在视频下方留言找我要。好，然后是调整这个图片的大小啊，拉伸 就出来了。好，接下来我们就画出这个账号密码和文本框，账号和密码这种是属于说明性文字，所以呢，我们就用这个标签。 好画一下，然后我们修改这个标签的 啊，这个我们就叫做 账号字体调整一下，嗯，把它调稍微大一点啊，加粗， 确认好这个字体的颜色呢，我们可以把它换一下啊，比如说可以把它换成白色，在什么地方换呢？在这个地方换啊，我把它调成白色。 ok， 好，然后我希望这个标签呢，他是个透明的啊，透明到这个地方啊， 然后再调整他的尺寸啊，自动。 ok， 我们把这个账号呢把它先放到这里来，然后按住 ctrl 好，再拖一个出来，这个呢我们就叫做密码，密码。 ok， 接下来我们就画两个文本框，文本框在这里 啊，这是个文本框，然后我们再拖一个下来，文字呢跟这个文本框啊，我们来做下对齐就可以了。好，我们把它稍微放上去一点。 好，接下来我们就要做两个命令按钮啊，第一个是退出，第二个是登录命令 按钮在这里先画一个出来，这个命令按钮呢，也可以把它的底色呢调整为透明 啊，反正你知道一个呢，你就知道所有了啊，一样是这个 style 啊，把它调成零啊，这个命令按钮我们就改名叫做退出啊，退出啊，这个字体呢，也可以把它改一下， 然后把它改成这个小四，然后出体，然后把它加出来。 好，然后我们点击他之后按一下孔雀，拖一个出来啊，这个我们就改叫登录 啊，登录好，我们还可以在这个登录和退出上面呢再加上一个图片啊，这样呢就更直观一些啊，这个图片怎么来加呢？我们点击这个地方，然后在这个分类里面呢，有个图片 啊，这个退出在这里啊，我点进来啊，点进来之后呢，我发现，哎，这图片呢把这个退出这两个字给覆盖掉了啊，我们可以来到这个地方呢来选择 啊，这个就是图片和这个文字的一个位置的这个关系啊，我们选择一个我们想要的，选了第一个，我觉得这样蛮好啊，就这样在这里同样的也是插入图片 啊，登录，然后调整他的位置， 我看一下。 哎，这样我觉得蛮好，这图片呢，分别放到这两端，然后中间是字，所以呢这个东西不是说一下就能调整好的啊，你一个一个试试，到你满意为止。那这个登录界面呢，这个框我们就已经画好了，我们先来调用它来看一看。 哎，这个就下一回事了啊，比如说我现在输入一个账号，然后再输入一个密码啊，来， 现在是点击不会有任何反应啊，因为没有写代码啊，但是我们可以在这里做个优化啊，就是我们输入密码的时候呢，通常情况下我们是不想让旁边能看到的啊，所以在 这个输入框里面呢，我们可以让他显示新号，或者说我们设置的另一个制服，这个是通过修管什么属性的，我们点击这个下面这地方，然后在这边找 好啊，有个 pass pro。 那在这里好，这个地方呢，我可以输入个信号啊，这是自定义的好，输入信号之后钓鱼看一看。 哎，这个时候我输入密码呢，他就是新号了。 ok， 我们再对这个界面呢进行一些优化啊，比如说这个上面这个呢，我们就可以把它改成一个当前的日期，那这个我们双击进去选择这个加载世界 啊，开不选，用大马来修改 好日期冒号，然后再连接当前日期。 ok， 来测试一下啊，这样就可以了， 下节课呢，我们再来写登录验证好了，那这一节课呢，就讲到这里，感谢各位看官的支持，如果这个视频能帮助到你，请帮忙点赞、收藏、转发。我是老吴，关注我，下节课我们将学习新的内容。

vba 字典应用教程，用 vba 字典对表格数据去重复向方法。大家好，本次让我们来学习 vb 当中哈一个非常重要的一个技术，就是 vb 的一个字领应用方法， 那这一节呢，我们尝试呢用一个字典呢哈啊去对这个表格数据呢进行一次去重，我们来看一下这个代码该如何去书写，如何去绑定和应用字典。好，我们点开开发工具啊，点开我们的微笔编辑器啊， 这边的时候呢，我们创建一个新的模块啊，比如说就自点驱虫吧， 在这模块当中，首先哈四点是需要绑定的，那么这个地方呢，我们需要执行一个后期的绑定啊，实际上也就是一个创建啊，一个创建啊，我们先剩一个 啊，字典啊，就是叫 dc 啊，他是一个对象类型的，然后呢我们去设定这个对象，让他去等于啊就是我们要绑定这个对象啊，去创造一下，创建一下 great 啊， 好，这然后呢里面的话是大家好，这个是固定的语法，大家只要记住就行了， dictionary 啊， ok， 那创建好之后啊， 下面可以什么就可以应用了啊？应用了，比如说我们这边哈要对这组数值呢，要进行一个去重，这边的话我们去把它放到一个数组当中去啊，所以说我再胜利一个数组，比如说叫 a r， 这个速度的虚呢，就等于我们这个单元格区域，从这里的啊 a 七啊，到一个 a 二十三，好，然后呢哈我们去循环这个数组， 循环当中呢啊，循环当中啊，我们这里哈怎么去除呢？哈，通常可以用这样一个方法将啊，就说这个数字中的每一个指 要循环出来的每一个值啊，这要注意啊，这边是有结构的是吧？都是一列数，这边他是一个二维数组啊，然后将他每一个值的哈都给他啊，给一个默认的一个啊， 默认了一个值，就说把它一个阿特姆，后面这个叫做阿特姆值，前面这个是 k 值，就是相当于哈修改他的一个阿特姆值，这样一个 操作啊，修改好之后呢哈啊，我们后面的哈去取出他所有的 k 来说明一个 k r， k r 呢，就等于一个 dc 点 k， 那此时实际上这个 k r 这个结果值呢？啊，实际上就是我们已经获取了啊驱虫之后的结果，那驱虫之后的结果它默认的啊，是一个异味数组啊，我们先来设置一个断点来运行看一下结果。 哦，这个啊，把它去消掉，这个不要了啊，注视一下，好， ok 哦，这边写错了哈，这边是不是 a r 是 ubum ar 就是他的一个上标啊，这样一个循环数据啊，在执行。好，这样我们看一下这个结果，此时可以看到哈这个 k r 他是一个一维数组，是零图三啊，零图三的。这样，实际上我们已经把什么把所有赛线之后的结果显示出来，但是呢，我们要显示的是什么显示从这个位置往下去啊，把它展示出来，它是一个竖向的，所以说我们需要把它转换成一个二维数组， ok， 最后我们再剩一个 k r 一，这里呢用到数字的一个转支了， 呃，点儿啊， transpose k r 这样一个转制，转制之后的话这个 k r 一就是我们要的纸了，你再运行一次看一下。好， k r 一可以看到啊，它是一个，呃，四行一列的是吧？四行一列的正好好转至之后呢， 那我们将 cr 一去复制上就行了。怎么复制呢？可以这样，比如说我们是从第七往下哈，第七这个单元格往下。第一次说呢，我们证明可以这样写，直接哈第七加入下一题啊，区域是吧？区域哈 啊，高度的话就是跟我们这个 k r 二一的一个行，那个第一列的那个就是行数是吧？是一样的啊，对，然后列数呢，就是一列等于多少等于 k r 一。好，这个这个查询呢就执行完成了，我来试一下。 好，点查，我们点右键哈指令红找一下。刚才写好这个字典去重， ok， 好，运行好，此时可以看到哈所有去重之后的数据呢，全部都显示到这里。 ok， 这个哈用是就是用字典法啊，这样一个执行方式，首先 先选绑定字典，接着呢哈，通过循环数组啊，这里有一个技巧，就是将啊字典中的每一个值呢哈重新绑定成什么一这样哈， 然后取出他所有的 k 值来啊，取出所有的 k 值来啊，所有的 k 值实际上就是我们要的数据了，这是一个竖向的一个竖向的一个什么？呃，返回结果，意思说呢，要进行一次转支，然后再进行一次复制。 好，这呢就是这样一个方法，大家可以自己去试一下。感谢大家观看本期视频啊，字典非常重要的一个未必的基础，大家可以好好学一下。好，本期就到这里，下期再见。

今天何老师给大家分享一个用 vba 做的一个静消存系统，现在我们看到的是系统的主界面，在使用这个系统之前，我们需要完善三部分的这个基础信息哈，在下面的第一个就是货品信息， 那在这个货品信息里面，我们可以去添加、删除、修改等等操作都是可以的哈，那接下来就是 客户信息，还有就是供应商信息啊，都是可以去任意的添加、删除、修改这三部分信息。我们完善了之后，那接下来就是做这个入库登记。好，我们点这个入库登记，那这个时候就进入到这个入库登记的这个界面，我们在这个供应商 旁边哈，我们双击这个单元格，那这个时候就弹出一个窗口啊，我们可以在这里选择供应商。 好，选择完了之后，那这个供应商的信息就带到了这个开单表这里来了哈。好，供应商信息选择了，那接下来就是要去选择货品信息， 同样的还是在这个货品编码下面哈，双击就会弹出一个框，那这个框里面的信息就是货品信息，那在这里如果比较多的这个货品啊，我们可以通过关键字的查找， ok， 找到之后我们就会双击他 就添加到这个入库单这个里面去了哈，好，我们多选择几个，好，再填上 数量。 好，数量填写完了之后就点打印好，这个就是打印的这个效果哈，好，最后面就是点保存 记录，保存成功，好，我们看一下这个入库记录表这边哈，刚才那个入库单的记录哈，就保存到这个入库单记录这边来了哈。好，我们返回，然后 再新建一个入股记录哈。好，选择一个供应商，我们快速的选择一个哈，选择货品， 填上数量。 好，在这里我们也可以填写这个备注哈，比如我们填 想补货， 点打印好，再点保存 好，我们再看这个入库记录这边哈。好，第二个单子，对吧？就在上面了啊，这里有补货对吧？好，我们再返回来，我们看这个库存报表。 好，这个就是库存报表哈，那出库总数这边现在是为零，因为还没有做这个出库单，对吧？好，我们返回来，我们做一个出库登记， 选择客户哈。好，同样的在这个货品编码下面双击选择货品啊。好，选择完了之后贴上数量， 点打印好，这个就是出库单哈。好，再点保存，再看一下这个出库记录啊，这里就看到了哈。好，我们再点这个库存报表，再点查询。 ok， 入口总是有了，秋裤总是有了，库存总数也出来了哈。这个既简单又高效的这个小系统啊，应该是每个仓管员必备的一个小工具了哈。

大家好，我是老吴，欢迎观看 excelvba 入门开窍课程，这节课我们来学习一个新的知识点，位置，允许 他可以对单个对象或用户定义类型执行一系列语句。这句话呢是官方的解释啊，下面这句话是我自己写的，他可以简化代码输入的方式，我们可以先录个红，比如说我现在选中一个区域， 好，然后我录指红好，现在我对这个区域呢，先加一个边框，这个格式 设置成这个加粗，然后斜体啊，然后再把这个字号设置成十二号， ok， 然后我们停止录制，来看下这个代码 啊，这个代码呢比较长，这里面用了很多这个位置语句，可以看一下，其实他本身没有什么含义，如果我不写这个位置语句， 我把这两句删掉的话，比如说我现在把这个删掉，那我对他进行一系列设置的时候呢，我就需要这样写了， 就要变成这样，这个前面都是一样的，每次都写就很不方便，也不利于观察啊，我们输了的时候呢，也非常烦，所以我们啊，不管是这个机器 还是我们手工写的时候呢，我们都加上这么一句啊，位置，然后把这个同样的这个前面这一段语句呢，写在这个上面位置的这个后面，然后下面的 每一句呢，我们前面只要打一个点就可以了，那这样呢，这句话跟上面这个位置后面这句话呢就能连上，所以说这个点很关键啊，这个点的话，如果你去掉他就不认识了， 好，后面呢跟这个安的纱布，或者说跟嗯的衣服是一样的，我们也要写一个结束啊，按住位置就可以了，这个大马路子的比较复杂，我们如果手写的话，对一个表格设置边框的时候呢，我们就这么写 好了，这个代码呢，我已经写好了，大家可以看一下，这里呢也用上了，这个位置距我对这个 b 三到一十五这个单元格区域进 进行一些设置啊，一三到一十五就是这个区域啊，我先把这个设置呢先去掉 啊，这个区有点大，我这遮住了，这样看到不直观，我把它放小一点，比如说是 b 三到一七这个单元格区，我改一下 b 三到一七 好， f 八来运行一下，好，边框裂边框行，然后是左上下右。 ok， 那这样呢，那四个边框就已经搞定了，然后这个位置呢他也能嵌套，比如说我们刚刚录制的时候呢，不但设置的边框， 还设置了啊，对这个加粗啊，鞋体啊，还有他的这个字的这个尺寸进行的设置啊，这三句话呢，我们可以把它复制一下，然后复制到我们这里来 啊，他就是对选择区域进行了设置，那这 选择区域呢，我们可以用这个来代表啊，我们直接写好就可以了，不用鼠标就选，所以我把这个地方删掉 啊，这样也可以，但是我们这里还可以发现就是这几个，那也是一样的，如果你想把这几个也简化一下，只能写三次，你也可以在这边做一个位置的圈套 啊，把这个点这个写到这里来好，然后把这前面这三个呢就可以去掉了， ok， 注意了，这个嵌套里面的这个位置呢，这个地方需要打个点，那这样呢，他就能跟这个润距后面连在一起，他下面的这些设置又可以跟他连在一起，那这样呢，他整体 就相连了。 ok， 我们可以来设置一下， 把它去掉一下，重新再来过一遍。 哦，对了，这边呢，我少写了一个结束语句。 ok， 来试一下啊，边框设置，然后进行肢体的设置啊，然后是加粗， 然后是鞋体，然后是字体。 ok， 设置完了啊，现在没什么反应，是因为我们这个表格是空的，我现在写一下看啊，对了，他不但加粗了，还是鞋体，字号呢，看一下十二。 好，没有错， ok， 这个语句呢，只是起到了简化我们输入的方法，对整体编写这个代码的逻辑和思路呢，不会有任何的影响。 还有就是这个嵌套呢，也不建议写的太多啊，如果你把这个嵌套写的太多呢，反而难以理解，那这样呢，就起不到这个位置与距的作用了。 好了，那这一节课呢，就讲到这里，感谢各位看官的支持，你的点赞是我继续创作的动力，关注我，下节课我们将学习新的内容。

vba 编写红编程代码，实现 xl 表格自动加减行。大家好，欢迎观看本期视频，本期呢我们讲一个红编程实现自动加减行的一个案例 啊，我们用这个编码的形式啊，实现一个自动加减行，加那个点加行的时候这边就最后再加行，减行的时候呢，从最后呢开始减行，这样一个效果 啊，我们来看一下啊，如何去实现好，比如说哈，我们这边是一个产品表啊，我们这里啊就直接进入一个代码的操作， 能找到这个点开这个 vb 编辑器啊，然后呢我们插入一个新的模块，叫做 写一个过程，是吧？写一个过程就叫什么加号，先写加号，加号这个怎么加呢？我们这里应该是先要找到这个表的什么 最后一行是在哪里？如何找到这个表的最后一行呢？嗯，现在的话，比如说哈，我们这个可能是什么有产品，对吧？或者是那个已经填充到这个位置的，然后呢如果说我们在这个最后往下加行的话呢， 最好呢找一个标准，是吧？找一个标准如何去找到最后一行？这里我们可以看一下啊，就说我们这一行地裂这一行呢，都有公式的，都有公式的啊，所以说我们找的时候呢，直接找地裂的这个 最后一个飞空的位置就可以了，是吧？最后一个飞空位置，也就是说从后往前找，找最后一个飞空的位置，我们就找到这个， 找到这个第十三这个位置啊，找到这第十三这个位置，然后从他开始呢进行一个呃加行的一个操作就行啊，就找到这个位置之后还不能直接加行，然后干什么？从下一行开始加，因为我们加行的时候 一般都是从什么？比如说哈，从最后一个位置开始加号，从这个位置是吧？十四，这个位置点击右键插入一行，然后的话再干什么？再去把这一行去啊？加上一个，加上一个网格线，是吧？加上一个这个网格横线，这是我们手动操作的时候是这样的， ok， 那么说如果说哈，我们通过这个，嗯，通过这个这个表哈，我们就手动操作是这样的，所以说呢，我们建行的时候应该是从这个十四行开始的，就说找到这个表格的最后一行在哪个位置 找到这个位，找到这一行之后，他的下一行这个位置开始插入行啊，是这样一个思路。好，所以说我们这里去写一下啊， 首先我们找到一个最后一行的一个位置，这里啊定一个变量叫做 r， 然后呢这个变量他呢是等于什么呢？这里啊我们学习一个套路代码，用一个单元格的一个从后往前查找的一个方法啊， 从啊，比如说第一列是第几行？第四行啊，第四列啊，第四列，然后的话的，嗯嗯的啊， xl 二， 从后往前找啊，这个意思啊，然后呢他的一个弱啊，这一步的意思哈，就是从后往前找，找到什么？第一行最后一行的一个非空位置，我们先运行一下，设置一个段底哈，设置到一个段底，我们去运行一下，看一下，可以看到二等于多少？等于十三，对吧？正好呢是我们要找的这个位置，十三啊， 没有问题。好，找到这个位置之后的话，然后呢我们拿一个二一，二一等于什么呢？二加一是吧？二加一， ok， 然后呢我们从什么二加一这个位置去，嗯插入一行，插入一行，所以说此时的话我们嗯 怎么插入呢哈，我们可以这样哈，用一个 rose 啊 rose， 然后呢二一是吧？ rose 二一代表什么？代表是第十四行，十四行这个位置我们去给他以四二插入一行啊，插入行还是以四二成 ship 是吧？很简单哈，很好记。然后冒号等于 xl shape， 然后呢后面的单元格往上往下移是吧？下上面的单元格往下移啊， xl 当啊，就这样就可以了， 这是个代码，这样呢就实现一个什么从十四行插入行的位置，插入行之后还要注意哈我们最好是什么，然后把这个 a 十四到这一十四这个区域呢，加上一个网格线啊，这也是一个条件啊，所以说此时的话呢， 我们还需要啊选中一个区域啊，这哪个区域呢？润之 a 连接一个二一是吧？到什么到 e 啊？连接一个二一，然后这个区域呢去设置一个样式。样式怎么设置呢？就是设置一个包带 borders 对吧。设置一个 line style 就是他的边框样式啊，就默认了就行了。 嗯，这样好， 中间哈这个分割符我们看一下啊，像这一块啊，要给他，要给他加上空格的哈，加上空格，不然的话他识别不到啊啊，我们看一下最后有没有拼错的啊。 t r n u o s。 没有问题 啊。少什么了啊？ ok 啊，顺便少了一个引号啊少了一个引号啊，这样就可以了是吧？顺便少了一个引号啊，这样就 ok 了啊，然后我们执行一下，看一下。 执行。哎，看到没有，此时的话，这一块就加入一行，是吧？插入一行，但是还有一个问题啊，是吧？我们这边是有公式的，我们上面这个单一个是有公式的，所以说最后好，加入这个样式之后呢，最好干什么？把上面这一行，这个第十三这个单 再靠配一下，是吧？把它复制到这个第十四这个单元格上去啊，就可以了。好，再继续写一下，再执行一步，用一个 range d 连接一个耳就行了，是吧？不用耳一了。然后呢点超配到哪里呢？润整 d 连接一个耳一 啊，还是比较简单的哈，然后这干什么？把它复制过来，这样就完美了。执行啊，可以看到啊啊，这公式都有了是吧？公式都有了啊，当然这个先删掉啊，这个先删掉 好啊，这次啊就可以实现了，好，再执行一次， 对吧？这边哈都已经加上了。好，那我问题来了，那么这是加行，加行完了之后是什么？是减行，减行怎么办呢？我重新写一下， 大家呢？直接那个可以那个把这个代码记下来，然后呢？呃，收那个仿照的去写一遍哈，就会了，然后减行怎么办呢？减行很简单，直接就是啊，也是同样道理，是吧？也是获取到这个饵 破译到这个耳之后呢？然后呢？直接就是，呃，删除就可以了。直接对什么？直接对这个 rose 耳，对吧？然后点击立场啊，直接删掉就 ok 了。把这一行哈，就把这一行找到最后一行，直接最后一行删掉就可以了，是吧？就这么简单，然后最后的话呢，把这个加号，点击右键指定红啊， 然后找到这个加号，然后这个减行呢？点击物件指定红啊，指定减行，我们试一下点加号，哎，可以看到啊，这是加号点减行， 这样就不断的建行了。好，这次呢，我们就通过代码呢实现了这样一个效果，大家可以去实践一下。感谢观看本期视频，大家可以多关注和点赞我们的视频，下期再见。 关注我学办公帮办公。

大家好，我是老吴，欢迎观看 excel vba 入门开窍课程。上节课结束的时候，我们说过，我们通过这个点击查询呢，设置一个啊，既可以用这个身份证查询，同时呢也可以兼顾用学籍号查询。我们 上节课写的只是用身份证查询。好，现在我把这个效果呢已经做出来了，我们看一下，我点击查询，首先呢，他会弹出一个窗体来啊，这个窗体会让我选择你是用身份证还是用学籍号查询啊，这是个单选框。好，如果我用这个学籍号呢啊，他就会让我输入 查询的学籍号啊，比如说我输入这个第一个吧，二二二二，确认。好，我们来看一下查询的是否正确啊。张华南啊，血型是 a 啊，爱好是看书，运动和旅游 啊，都打算勾了。然后医学院临床医学身份证手机号， ok， 好，如果我现在再一次查询呢，我点这个身份证啊，他就会说输入查询的身份证，比如说我现在查这个六五六五， 那就查询到了啊， ok， 没有任何问题。好，这个效果是如何做的？我们来看一下这个代码 啊，这个代码呢是我们上节课写的主体没有什么变化，增加了一个这样的判断。好，我们来讲一下这个代码是怎么来修改的啊，在上节课的基础上怎么来修改？ 首先是这样的，我在这边插入了一个优质 flow 秀啊，加了这么一句话，窗体舞呢，首先我画了一个这个窗体 啊，窗体上有两个单选框，是提供给我们去选择的。好，然后里面写的什么代码呢？看一下啊，首先这个代码是不让他这个关闭的啊，就是这个窗体掉出来之后啊，我不希望用户可以直接通过这个关闭啊，把这个窗体关掉，我就是让他必须 来选择一个你是身份证还是学习号好，然后就是单选框的肯定一个事件好，这个事件你点下去之后呢，他就会判断啊，如果这个单选框是选择的啊，就是你点下去了这个单选框的不要留，就会返回去， 然后就会运行这句话，那把这个 opm 八肯的这个开屏给到这个查询依据，那这个查询依据呢？他是一个变量，等一下再来 讲这个开不起呢，其实就是这个啊，就是这个身份证或者是这个学籍号这三个字，然后就是 alod me 啊，把这个窗体关掉 好，下面这个呢，也是一模一样的啊，只不过是 oppon 八统一改成了 oppo x 八腾。二，就是无论你选择哪一个单选框好，他都会把这个身份证或者是学籍号给到一个变量，这个变量叫做查询依据， 这个变量接收到了奥普逊巴腾他的开普选之后呢，我们在这个这个地方啊，就能做一个判断啊，以如果查询依据是身份证的话，把这个七复制给这个查询列。这个变量啊，如果不是 是，那你选择的就是学习号，那我就把这个八复制给查询列啊，由于只有两个选择呢，所以直接 lc 就可以了啊，不需要再写 lce 啊。这个查询列是什么意思呢？来看看这里 啊，剧烈其实就是第七列啊，第七列啊，如果你选择身份证，我就在第七列查询，如果你选择学籍号，我就在第八列查询啊，这个是要有一个区别的 好，然后接下来就进入了这个我们上节课写的代码啊，但是这里我就使用了变量，无论你选择身份证还是学习号呢， 提示的都是输入要查询的啊，这个变量好，当你把这个学习号或身份证输入进来之后呢，就由这个变量来接收，然后下面 一个判断，就是为了防错的啊，如果这个地方你没有输出呢，那我就提示未输入啊，同样的是变量啊，未输入身份证，未输入学习号，然后结束这个过程。好，下面进入查询啊，这个地方很关键， 我们上节课呢，是在这边写了一个怨句，然后剧烈啊，这种表达方式呢，是一个写的比较死的一种方式啊，不灵活， 所以我把它改成了这个啊列啊，因为这样显得会很灵活啊，我只要改变这个变量就可以了啊，就是在学生信息的第几列进行查询 啊，这个列取决于你上面这个选择的是身份证还是学习号啊，这个应该就可以理解了，好查询的东西呢，是 这个，你输入进来的身份证或者学习号就是这个变量好，查询到了之后，就会给到这个对象啊，这个对象来进行一个判断啊，如果是空的，那就提示未查询到该 身份证或者学籍，如果查询到的呢？ l 把这个查询到的行号给到负值，这个制定函数 啊，写在这地方啊，这边就是开始进行复制了啊，你把这个行号呢传递过来之后啊，就是这个 cd 接收到了这个行号，然后就开始复制啊，这些都是我们上两节课学习的知识啊，如果不了解的话呢，可以翻 看前两节课来进行学习。 ok， 那这个效果呢就已经完成了啊，我现在还有一个关键点没有说 啊，就是我现在这两者呢共用了一个变量啊，这个变量叫做查询依据啊，如果你直接这么写呢，这边是访问不到这个优质服装五的啊，就是在这边优质服装四 这个呢啊，这个他是访问不到这个优质服装五里面接收到的这个东西啊，这个怎么办？ 这个知识呢我在之前没有讲过，好像这个就涉及到一个全局的变量，全局变量我们要把它写在模块里面啊，所以我就把它写在这个地方啊，帕布里克啊，这个帕布里克呢就是一个公共的变 量啊，也就是意味着这整个一个摄入工作部里面的任何一个地方啊，比如说这个在血统模块里面呢，或者说在窗体里面，或者在另外的模块里面，比如说你在插入模块二，模块三，都可以反问这个变量， 所以要用这个帕比克。好，这也是一种声明变亮的方式啊，就把它写在最外面啊，相当于我在这个优质弗朗五啊，当我点击下去的时候呢，这个奥普选巴腾把他的开分选给到了这个 查询依据哈，然后这个查询依据呢在这边啊就会得到保存， 然后我在优质服装四里面再次使用这个变量的时候呢啊，我就可以访问这个这个地方 我们刚刚已经结束的过程啊，因为这个优质服装五已经结束了，因为我点下去的时候呢，这个过程已经结束了啊，并且窗体已经关闭了，但是没有关系，由于这个模块里面呢有一个全局变亮，即便他结束了，我依然可以反问这个 被保存到的这个数据。 好，然后下面这些东西呢，就是我们上节课的知识了啊，就是 如果这个切换按钮弹起来之后呢，就把这个控件调成可编辑的状态，并且清空，然后把切换按钮的开不选还原成这个点击查询。 好了，那这一节课呢，就讲到这里，感谢各位看官的支持，如果这个视频能帮助到你，请帮忙点赞、收藏、转发。我是老吴，关注我，下节课我们将学习新的内容。