Return Value from cell comment

I'm using a function at the moment to copy the comment text from cells, but would like to Change it a Little.
At the Moment I have:

Function CC(cel As Range)
        CC = cel.Comment.Text
End Function

There are 3 Basic Groups that the comments refer to, eg: If a comment is a 1,4,11,14 it's Group A. 2,5,12,15 are Group B, etc...
I guess it would be something like

If CC = (1,4,11,14)
then "A"
else if cc = (2,5,12,15)
then "B"

I can quite figure out how to formulate it correctly though.. Can anyone help??

Thanks
Michael

Works a treat! Thanks a lot