我不想使用宏来计算宽度。我只想在excel中选择列(只需单击每个字母A,B,C等),然后有一个神奇的答案,即我选择的每列的宽度总和是px。 Excel只允许我知道每列的宽度,如果我改变任何列的宽度,它只会使所有选定列更宽。
任何提示都表示赞赏。
答案 0 :(得分:6)
这不会给你一个神奇的答案,但它可以让你在没有任何VBA的情况下快速得到答案。
1)在文档顶部插入一个空行
2)在单元格A1中,输入以下公式:
=CELL("width", A1)
3)通过拖动A1的细长黑色十字准线将公式应用于所有其他列(当它悬停在单元格的右下角时显示)。
你会得到的是每列宽度的圆形像素值。 然后,只需为要添加的所有列选择第一行中的单元格,然后查看Excel窗口的底部。在进行选择时,您应该看到值的总和。 例如,如果要总和列A,B和D的宽度, 选择A1 CTRL +单击B1并按CTRL +单击D1。在右下角,您将看到它们的总宽度。
我希望这会有所帮助。
答案 1 :(得分:1)
通过为单元格指定一个定义的名称,您可以按点获取列宽。请参考下文,使用单元格A1作为示例:
注意:请确保在步骤2中不要锁定单元名称。
希望这有帮助。
答案 2 :(得分:1)
答案 3 :(得分:0)
Sub ColumnAuto4()
' Paul Pfau -- 8.02
Dim Column_ As Integer
Dim ColumnMin_ As Integer
Dim Loop_ As Integer
Cells.EntireColumn.AutoFit
Column_ = 1
For Loop_ = 1 To 20
Cells(1, Column_).Select
ActiveCell = "=CELL(""width"")"
ColumnMin_ = ActiveCell.Value
If ColumnMin_ < 4 Then
ActiveCell.ColumnWidth = 4
End If
Column_ = Column_ + 1
Next Loop_
End Sub