首页 > 自考资讯 > 高考百科

小白都能学会的VBA代码,一次性教给你 vba所有代码大全及语法

小条 2024-06-27

继昨天的自定义函数之后,今天我们将介绍一些常用的VBA代码!

我想很多朋友一听说VBA就立刻退缩了,认为这是一场灾难。

事实上,VBA 代码并不可怕。只是我们认为它是一些神秘而可怕的东西,因为我们接触的VBA代码不多,而且总是听到当权者谈论它。

5a069ba1c6c44cbb96fe5f93f5045c47~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=0nlqnDo7QDx6KmFDLxCCuDccyMY%3D

今天小E就来揭开VBA代码的神秘面纱,介绍一些常用的简单代码,非常方便大家在工作中应用,大大提高工作效率。

那么请先跟随小E了解一下相关操作的基本常识吧~

- 1 -

了解VBA 编辑器

我们都知道Excel中的数据存储在单元格中,但是你知道VBA代码存储在哪里吗?

答案是如下所示的VBA编辑器。

bf3a130a800c4f478c95e60ae965f362~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=bG9MHV9jjenmEW4D%2B%2FCg3oepDew%3D

那么如何打开VBA编辑器呢?这里教你三种方法。

方法一

从选项卡打开

单击“开发工具”选项卡,找到“Visual Basic”命令,单击进入VBA编辑器,如下图所示。

2a60aa4d3720430f94932017f62511dc~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=jdwEP7I36sWYqYo29HmHzlr1BGQ%3D

如果菜单栏上没有[开发者工具]选项卡,请按照以下步骤显示该选项卡。 —— 单击【文件】-【选项】,单击【自定义功能区】,勾选“主选项卡”下的“开发者工具”。 ”,然后单击[确定]。

47ab7858aaa340cdbcc44f2c26120098~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=sGwsxTKepMv6AlP6b%2BO0iu%2B0q40%3D

方法二

右键单击工作表标签将其打开并查看代码

右键单击任意工作表标签,在弹出菜单中单击“查看代码”,进入VBA编辑器,如下图所示。

07c9dbea5f354e3880084a66cb13be33~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=wmY%2BttV5zE1UVb7B5%2B48L0j8Uc8%3D

方法三

用快捷键打开

在任何工作表中使用快捷键[Alt+F11]进入VBA编辑器,但根据您的笔记本,您可能需要同时按[Fn]键。

- 2 -

如何运行VBA代码

我们的大部分VBA代码都存储在VBA编辑器中的模块中,但是我们如何添加模块呢?

在左侧的“项目资源管理器”中,右键单击“此工作簿”或上面任何工作表的标签,单击菜单上的“插入”,然后从弹出的下一级菜单中选择“插入”。单击“模块”,插入模块,如下图所示。

cd3075a168b14b6ab85812f4def8076e~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=h0wfqG68j%2Bt0V9tij7PKFQaJOck%3D

既然您知道在哪里保存VBA 代码,那么如何运行它呢?

单击“开发者工具”选项卡,找到“宏”命令,然后单击它,如下图所示。

987251a0cd984d86917c96b42839cda2~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=GD8DQK%2BIWWn07cKnWtHx21BDV9k%3D

弹出的宏对话框显示您创建的VBA 宏的名称。单击要运行的宏的名称将其选中,然后单击“运行”以运行VBA 代码。如下图:

f92f6ac7b6f74dc3830a544567a2c607~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=WzmiUoPz00UMoo%2BIaKYvH1FOeF4%3D

- 3 -

常用VBA代码

我想你现在已经掌握了VBA代码的基本操作。小E就贴一些常用的简单的VBA代码吧~

虽然只有几行,但可以节省大量时间。

工作表的批量保护/取消保护

您可能需要为工作表添加密码,以防止他人误操作,但工作表太多,逐个设置保护可能是一项繁琐的工作。以下VBA 代码将使速度更快。

Sub Protect Sheets()Dim i As LongFor i=1 To Sheets.Count Sheets(i).Protect '123'NextEnd Sub

我将简要解释一下代码——。

第一行是定义的宏的名称。例如,该宏的名称是“保护工作表”。这两行有固定的用途。第二行的Dim 定义了变量的类型。这里,变量i被定义为长整数。第3 行和第5 行是For Next 循环的用法。 Sheets.Count 指工作表的数量。 For i=1 To Sheets.Count 表示在For 和Next 之间从第一个表到最后一个表执行循环。代码。第四行是主要功能代码。 Sheets(i).Protect 通过更改变量i 来保护每个工作表。下一个字符串123 是您的密码。您可以根据您的需要更改它。

那么我们如何编写取消工作表保护的代码呢?

实际上,您所需要做的就是更改宏名称并更改第四行代码。这是修改后的代码:

Sub Sheets()Dim i As LongFor i=1 To Sheets.Count Sheets(i).Unprotect '123'NextEnd Sub

批量重命名工作表

在某些情况下,您可能会创建许多工作表,工作表名称可能为Sheet1、Sheet2 等。这使得显示数据时难以区分,需要重命名工作表。我要把每张作业单都一一解决,看来又要忙一阵子了!

例如,您必须将所有以Sheet2 开头的工作表重命名为每个工作表的单元格C2 中的值。这意味着您需要将工作表名称更改为部门名称,以便更容易查看每个部门的状态。

66435f89c9cf445ba4fc44cd635e3cee~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=iNab8qoG%2FRcEUVA6lXIYkamMEz0%3D

VBA 代码再次派上用场。

Sub 重命名工作表()Dim i As LongFor i=2 To Sheets.Count Sheets(i).Name=Sheets(i).Range('C2')NextEnd Sub

我将简要解释一下代码——。

第1、2、5、6 行与前面的代码具有相同的功能,因此这里不再重复。第三行仍然是一个循环,但循环是从第二个工作表开始的,因此使用For i=2 开始,直到最后一个工作表。第四行是更改工作表名称的关键代码。 Sheets(i).Name 表示该工作表的名称,与该工作表单元格C2 中的值相同。

- 4 -

小心这个“坑”

保存时请注意文件类型

如果文件扩展名为“.xlsx”,添加代码后,保存文件时会看到如下提示:

e26ad8e81adc4d858b50636b1c933df1~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=b6W1ORXf7TmBLHDWF2nrinknnws%3D

此时点击【否】,保存文件格式时选择“Excel启用宏的工作簿(*.xlsm)”,点击【保存】。

2c7e0f27dbdb48d59a09ff6c2372b724~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=PtwNHZamfIbngnOvVkuoA9692wY%3D

如果选择“是”,则在关闭并重新打开该文件时,您的VBA 代码将会丢失。

打开包含宏代码的工作簿

如下图所示,当您打开包含宏代码的工作簿时,您将收到安全警告(宏被禁用)。此时,您必须在运行关联的宏之前通过单击启用内容来启用宏。宏代码。

23f1c43dc6dc4efe8c3c36d87f2c3d41~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=KGr8jiudAfPlIRg2K8325u44oXA%3D

如果未启用宏,则代码将不会运行。点击运行相关代码,会看到这样的提示:

a8e0d5ef31094cb9b223a98397f99dac~noop.image?_iz=58558&from=article.pc_detail&lk3s=953192f4&x-expires=1720070234&x-signature=udO3U4sLydB4dJG5ZVoXJttx2Js%3D

那么,关于VBA从入门到一些常用的简单代码,你都学会了吗?

当然,小E知道这些只是九牛一毛,但如果你有兴趣,掌握基础再去探索,说不定会发现另一个新世界。

稍后,你还会看到小E在工作中使用VBA解决问题。如果您想阅读,请点击文章末尾的“赞”。

版权声明:本文转载于网络,版权归作者所有。如有侵权,请联系本站编辑删除。

猜你喜欢