3

我有一个包含几个分组列的 excel。在该组内,几列是隐藏的。(右键单击隐藏)。当组折叠时,所有列的 .Hidden 属性返回 true,这是我不想要的。有没有办法将原本隐藏的列与折叠组中的其他组列分开?

4

1 回答 1

3

不完全理解这个问题,但在 VBA 中我可以测试一下是否像这样隐藏了一个列:

Option Explicit

Sub TestFunction()

  'hide a few columns and then run me<<<<<<<<<<
  Dim mySearchColumn As Integer
  mySearchColumn = (CInt(Application.InputBox("input a column number")))

  MsgBox ("you wanted to know about column " & mySearchColumn & ". Is it hidden: " & IsColumnHidden(mySearchColumn))

End Sub

Function IsColumnHidden(targetColumn As Integer) As Boolean
    IsColumnHidden = False
    If Columns(targetColumn).EntireColumn.Hidden Then
        IsColumnHidden = True
    End If
End Function
于 2012-12-15T17:41:55.307 回答