58问答库 > EXCEL中有300行我需要奇数一种行距，偶数一种行距。怎么实现？急，在线等，

EXCEL中有300行我需要奇数一种行距，偶数一种行距。怎么实现？急，在线等，

2025-05-03 14:30:39

推荐回答（1个）

回答（1）：

这个得用VBA，函数给你写好了
Sub 宏1()

Dim i As Integer
For i = 1 To 300 Step 1
Rows(i).Select
If i Mod 2 = 0 Then
Selection.RowHeight = 你要的偶数行行高
Else
Selection.RowHeight = 你要的奇数行行高
End If
Next

End Sub
对于如何把VBA布上去有问题的话继续追问

EXCEL中有300行 我需要奇数一种行距，偶数一种行距。怎么实现？急，在线等，

EXCEL中有300行我需要奇数一种行距，偶数一种行距。怎么实现？急，在线等，