横向二级菜单代码(jquery横向二级菜单)

哈喽,大家好呀。

我相信有许多朋友都是很想学习Excel的王炸功能——VBA,但是碍于其难度系数,一直可望而不可及。

没关系,今天就和小编一起从入门开始学习吧!

一、先认识一下VBA

VBA为广大用户提供了对Excel功能进行二次开发的平台。

我们可以借助VBA完成许多仅凭基本操作和公式无法实现的功能,并且可以实现工作自动化,提高工作效率。

二、打开VBA编辑器的三种方式

1.在功能区的“开发工具”中打开VBE界面

很多同学的Excel功能区中没有“开发工具”选项的,我们可以通过“选项”中的“自定义功能区”,调用出这个功能。

展开全文

然后选择“开发工具”——Visual Basic功能键,就可以打开VBE界面。

2.在工作表标签上单击鼠标右键,打开菜单栏;

在弹出的菜单中,选择“查看代码”,也可以打开VBE界面。

3.ALT+F11组合键打开,这是最常用的打开方式。

注意:无论你使用何种方式打开VBE界面,都要记得,要打开某个工作薄之后,才可以使用VBE,毕竟EXCEL文件才是VBE的载体。

三、创建写VBA代码的地方

在哪编写代码呢?今天先学最常用的:插入 - 模块。新建一个模块来存放编写的代码。

四、开始写代码

插入(或双击)模块后,在右侧的空白位置就是编写代码的地方。

可以执行的VBA代码(宏程序),结构是这样的:

Sub程序名(参数)

可以执行任务的代码

End Sub

输入Sub 程序名 然后回车,End Sub就会自动输入。

五、常用的VBA代码

到了这一步,相信大家已经大概掌握了VBA的简单操作,下面就让我们来给大家分享几个常用的VBA代码吧,短短几行,就能让你的办公效率得到质的飞跃~

示例1:批量取消隐藏工作表

如果需要取消隐藏的工作表很多,右键选择【取消隐藏工作表】就会显得很繁琐,我们只需要几行VBA小代码就刻意搞定啦!

Sub qxyc

Dim sht As Worksheet

'定义变量

For Each sht In Worksheets

'循环工作簿里的每一个工作表

sht.Visible = xlSheetVisible

'将工作表的状态设置为非隐藏

Next

End Sub

示例2:判断身份证号的位数是否正确

这样的一组号码,不考虑号码的信息正误,只看位数,你很难知道它是否是18位,那么此时用代码来处理,就显得很方便了,如下:

【代码解析】

Line1:使用工作表“IF判断语句”作为代码中引用对象的统一父级对象;

Line2:规定循环变量i的范围为2到10,因为我们是遍历单元格,逐行判断,所以循环变量应该以单元格的行号作为循环依据,所以是ROW2到ROW10;

Line3:Cells(i, 1)说明是某一行和第一列的交点单元格,当i变量为2,3,4,…,10时,对应的单元格地址就是A2,A3,A4,…,A10。用LEN函数提取单元格字符串的长度,判断是否等于18;

Line4:如果判断条件满足,则Cells(i, 2)对应的B列单元格中输入“18位”;

Line5:判断语句的结束语句;

Line6:循环语句的结束语句;

Line7:With语句的结束语句。

示例3:批量重命名工作表

工作表默认的名称是Sheet1这种,对我们查找数据时很不方便,我们想批量给他改名怎么操作呢?

六、测试、执行、保存代码

在编写代码时经常要测试是否正确。测试方式是把光标放在代码行的任意位置,点击 运行小按钮。

要想执行VBA代码,我们只需要右键点击 指定宏- 选择编写的宏名称即可。

另外,有个点要特别注意,我们在保存文档的时候,【保存类型】要选择为 “启用宏的工作簿”类型,这样我们辛苦写出来的VBA代码才能保存下来。

代码一两行,工作再也不用忙断肠。

今天的VBA入门课程,你都学会了吗?

还有疑问的同学,欢迎留言评论区。

横向二级菜单代码(jquery横向二级菜单),横向二级菜单代码(jquery横向二级菜单),横向二级菜单代码,第1张

对了,我们还有一套免费的VBA脱白课程,送给大家!

扫码进群获取链接

免费观看!

1、本网站名称:源码村资源网
2、本站永久网址:https://www.yuanmacun.com
3、本网站的文章部分内容可能来源于网络,仅供大家学习与参考,如有侵权,请联系站长进行删除处理。
4、本站一切资源不代表本站立场,并不代表本站赞同其观点和对其真实性负责。
5、本站一律禁止以任何方式发布或转载任何违法的相关信息,访客发现请向站长举报
6、本站资源大多存储在云盘,如发现链接失效,请联系我们我们会第一时间更新。
源码村资源网 » 横向二级菜单代码(jquery横向二级菜单)

1 评论

您需要 登录账户 后才能发表评论

发表评论

欢迎 访客 发表评论