IsColumnSelected(ColIndex As Long) As Boolean ( Function )