请问，如何计算excel表格中的总行高，比如A1到A20，之间行高各不相同，如何才能算出他们的总行高呢？

发布网友发布时间：2022-04-25 09:24

共5个回答

热心网友时间：2023-11-12 19:30

创建宏：henggao()
Sub 按钮1_单击()
MsgBox Range("A1:A20").Height * 0.035 & "厘米"
End Sub
'
'转成直观的厘米显示格式

热心网友时间：2023-11-12 19:31

只能用VBA
Sub gao()
Dim r, h
h = 0
For r = 1 To 20
h = h + Rows(r).Height
Next r
Cells(1, 1) = h
End Sub

这样就可以把你需要的数字写到A1，也可以修改倒数第二句后写到其他单元格

热心网友时间：2023-11-12 19:31

这100多个表是不是在一个文件里面，如果是就在底下一起选中，再调整一个就可以了

热心网友时间：2023-11-12 19:32

Sub 按钮1_单击()
MsgBox Range("A1:A20").Height
End Sub

试试这个!

热心网友时间：2023-11-12 19:32

算这个来干什么？excel是做不了这一块的。

热心网友时间：2023-11-12 19:30

创建宏：henggao()
Sub 按钮1_单击()
MsgBox Range("A1:A20").Height * 0.035 & "厘米"
End Sub
'
'转成直观的厘米显示格式

热心网友时间：2023-11-12 19:30

创建宏：henggao()
Sub 按钮1_单击()
MsgBox Range("A1:A20").Height * 0.035 & "厘米"
End Sub
'
'转成直观的厘米显示格式

热心网友时间：2023-11-12 19:31

热心网友时间：2023-11-12 19:30

创建宏：henggao()
Sub 按钮1_单击()
MsgBox Range("A1:A20").Height * 0.035 & "厘米"
End Sub
'
'转成直观的厘米显示格式

热心网友时间：2023-11-12 19:31

这100多个表是不是在一个文件里面，如果是就在底下一起选中，再调整一个就可以了

热心网友时间：2023-11-12 19:31

这100多个表是不是在一个文件里面，如果是就在底下一起选中，再调整一个就可以了

热心网友时间：2023-11-12 19:32

Sub 按钮1_单击()
MsgBox Range("A1:A20").Height
End Sub

试试这个!

热心网友时间：2023-11-12 19:32

Sub 按钮1_单击()
MsgBox Range("A1:A20").Height
End Sub

试试这个!

热心网友时间：2023-11-12 19:32

算这个来干什么？excel是做不了这一块的。

热心网友时间：2023-11-12 19:31

这100多个表是不是在一个文件里面，如果是就在底下一起选中，再调整一个就可以了

热心网友时间：2023-11-12 19:32

Sub 按钮1_单击()
MsgBox Range("A1:A20").Height
End Sub

试试这个!

热心网友时间：2023-11-12 19:32

算这个来干什么？excel是做不了这一块的。

热心网友时间：2023-11-12 19:32

算这个来干什么？excel是做不了这一块的。