养生 装修 购物 美食 感冒 便秘 营销 加盟 小吃 火锅 管理 创业 搭配 减肥 培训 旅游

在VBA中,如何编写调整行高的代码

时间:2024-10-24 07:30:16

本篇经验将和大家分享,【在VBA中,如何编写调整行高的代码?】

工具/原料

电脑壹台

OFFICE办公软件

方法/步骤

1、实例:【调整涂色区域的行高,奇数行为25,偶数行为10?】,如图所示。

在VBA中,如何编写调整行高的代码

2、在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visualbasic】!

在VBA中,如何编写调整行高的代码

3、会进入VBA编辑界面!点击菜单栏【插入】,在其下拉菜单中,选择【模块】!

在VBA中,如何编写调整行高的代码

4、会弹出模块编辑窗口!

在VBA中,如何编写调整行高的代码

5、在代码编辑窗口输入以下代码。Sub调整行高()ForEachrwInRo嘛术铹砾ws("1:15")Ifrw.Row罄休卦咦Mod2=0Thenrw.RowHeight=10Elserw.RowHeight=25EndIfNextEndSub

在VBA中,如何编写调整行高的代码

6、在VBA窗口,点击【运行】按钮!

在VBA中,如何编写调整行高的代码

7、如图所示,表中行与行之间显得很有层次,比较清晰!

在VBA中,如何编写调整行高的代码

© 一点知识