XLA routines: EE_TableGetColumn

Nick's picture
EE_TableGetColumn takes a heading and returns the whole column as a range
Function EE_TableGetColumn(Heading As String, Optional Table As range) As range
'http://excelexperts.com/xla-routines-eeTableGetColumn  for updates on this routine
    ' returns the whole column from a header
    If Table Is Nothing Then
        Set Table = ActiveSheet.UsedRange
    End If
    Set EE_TableGetColumn = Columns(EE_TableHeadingCol(Heading, Table))
End Function