如何控制每列的高度

bown2022 · 发表于 2022-7-20 15:50

在排版中，遇到有的列是一行文字，有的是两行文字，还有的是3行文字，按照自动适应列高的处理，有时不够美观，想让文字上下的空隙更大一些，有没有什么方法批处理不同行数文字的高度。

123.rar (6.98 KB, 下载次数: 5)

jessicagtc · 发表于 2022-7-20 16:31

选中需要设置行高的行，点右键批量设置行高（不超过两行，我一般设25）
。

bown2022 · 发表于 2022-7-20 16:34

jessicagtc 发表于 2022-7-20 16:31
选中需要设置行高的行，点右键批量设置行高（不超过两行，我一般设25）
。

举个例子，1，3，5行每行3行文字，2,4行每行1行文字，这个有更便捷的方法吗

清风竹- · 发表于 2022-7-20 16:39

本帖最后由清风竹- 于 2022-7-20 16:48 编辑

请看附件。VBA代码。方法是：自动适应行高，每行再增加一个固定值。

bown2022 · 发表于 2022-7-20 18:39

清风竹- 发表于 2022-7-20 16:39
请看附件。VBA代码。方法是：自动适应行高，每行再增加一个固定值。

这个办法真好！！！！！！！！！！

bown2022 · 发表于 2022-10-17 16:05

清风竹- 发表于 2022-7-20 16:39
请看附件。VBA代码。方法是：自动适应行高，每行再增加一个固定值。

你好，用你编写的代码解决了不少排版的问题，但今天遇到一个新的问题，如果有单元格合并了，这个代码就不能很好的运行了，为什么！求助。

调整行高.rar (12.87 KB, 下载次数: 3)

清风竹- · 发表于 2022-10-18 16:16

本帖最后由清风竹- 于 2022-10-18 17:35 编辑

bown2022 发表于 2022-10-17 16:05
你好，用你编写的代码解决了不少排版的问题，但今天遇到一个新的问题，如果有单元格合并了，这个代码就不 ...

请看附件。

bown2022 · 发表于 2022-10-18 16:28

清风竹- 发表于 2022-10-18 16:16
请看附件。

看了代码，这是把4和5行合并的高度进行调整，如果8和9行合并，11、12、13也出现3行合并呢！

清风竹- · 发表于 2022-10-18 17:34

bown2022 发表于 2022-10-18 16:28
看了代码，这是把4和5行合并的高度进行调整，如果8和9行合并，11、12、13也出现3行合并呢！

请看附件。

bown2022 · 发表于 2022-10-19 08:47

清风竹- 发表于 2022-10-18 17:34
请看附件。

运行了代码，解决了排版反复调整行距的问题。能否多请教一个问题，有时一个项目任务需要多个单位负责，所有b栏合并了单元格，c栏分别列出负责单位，但一个任务对应一个序号，有没有什么办法直接下拉填充序号，无论c栏有多少行，a栏合并后显示是项目任务的序号。我知道在不合并的情况下，通过下拉填充或者row函数可以实现，但出现单元格合并，有时任务数量多，填写序号如果能自动生成，也会提高效率，减少失误。不知可否有办法解决。

		自动登录	找回密码
密码			免费注册

[求助] 如何控制每列的高度

评分

评分

评分

评分