Selecting multiple columns with merged cells

**Mordred** · 08-08-2011, 01:04 PM

Here is a very generic way to check for hidden columns. Important to note is that it is only asking if column B is hidden. It would need to be amended to your criteria.

Sub FindHidden()
    Dim Ws1 As Worksheet
    Set Ws1 = Worksheets("Sheet1")
    If Ws1.Cells(2, 2).EntireColumn.Hidden = True Then
        ''Do some code once you know if it is hidden
        MsgBox "Hidden"
    End If
End Sub

**maw230** · 08-08-2011, 03:49 PM

Originally Posted by Mordred

Here is a very generic way to check for hidden columns. Important to note is that it is only asking if column B is hidden. It would need to be amended to your criteria.

Sub FindHidden()
    Dim Ws1 As Worksheet
    Set Ws1 = Worksheets("Sheet1")
    If Ws1.Cells(2, 2).EntireColumn.Hidden = True Then
        ''Do some code once you know if it is hidden
        MsgBox "Hidden"
    End If
End Sub

So, Cells(2,2) refers to cell B2 correct?