Checks if value is in a collection. True if in collection, False if not in collection

InCollection.vba

Function InCollection(ByVal ctl As String, col As Collection) As Boolean

For Each c In col
    If c = ctl Then
        InCollection = True
        Exit Function
    End If
Next c
InCollection = False
    
End Function