Excel可以统一调整所有行的行高,但是想在每行原有的基础上增加一个固定的高度,确没有相关的设置,不过也不是不可以实现,只需要用VB宏就可以实现。

在Excel创建一个宏,输入下面的代码:

Sub abc()

Rem 第1行到第100行进行一次循环(可根据需要自己改行数)
For i = 1 To 100

Rem 隐藏行不执行(可根据需要自己修改,进行了更新,如果需要执行隐藏行请参考下面图片里的代码)
If Not Rows(i).Hidden Then

Rem 第i行调整为最适合行高(如果不需要此步骤删除下面的代码)
Rows(i).AutoFit

Rem 第i行高度+6(可根据需要自己改高度)
Rows(i).RowHeight = Rows(i).RowHeight + 6

End If

Next

End Sub

那么代码Rem 后面是下面一行代码的注释,也就是解释,比如【Rows(i).AutoFit】这段代码会先调整为适合行高,如果不需要删除这段代码即可。

设置步骤:

  1. 这里以WPS演示,Office类似。
  2. 点击“开发工具”-“VB宏”(WPS启用宏需要先安装VBA)
  3. 宏名输入“abc”,点击创建。
  4. 在弹出的代码编辑窗口先删除原有的代码,在复制上面的代码进去,最后关闭窗口即可。
  5. 需要使用的时候,点击“开发工具”-“VB宏”,选择abc,点击运行。

如果你的WPS没有安装VBA,可以注册账号,下载本篇文章的附件,附件为VBA7.1版本,2金币仅仅两分钱,也可以签到两天免费下载。

发表评论

后才能评论

本站所有资源版权均属于原作者所有,这里所提供资源均只能用于参考学习用,请勿直接商用。若由于商用引起版权纠纷,一切责任均由使用者承担。更多说明请参考 VIP介绍。

最常见的情况是下载不完整: 可对比下载完压缩包的与网盘上的容量,若小于网盘提示的容量则是这个原因。这是浏览器下载的bug,建议用百度网盘软件或迅雷下载。 若排除这种情况,可在对应资源底部留言,或联络我们。

对于会员专享、整站源码、程序插件、网站模板、网页模版等类型的素材,文章内用于介绍的图片通常并不包含在对应可供下载素材包内。这些相关商业图片需另外购买,且本站不负责(也没有办法)找到出处。 同样地一些字体文件也是这种情况,但部分素材会在素材包内有一份字体下载链接清单。

如果您已经成功付款但是网站没有弹出成功提示,请联系站长提供付款信息为您处理。

资源属于虚拟商品,具有可复制性,可传播性,一旦授予,不接受任何形式的退款、换货要求。请您在购买获取之前确认好 是您所需要的资源。