CATIA VBA

Hey,

I'm new in catia automation i got some problem like, i got all faces by selection.search but im not going to able differentiate cylindrical and planar faces....

i tried it by try catch method but i want another method which will be perfect solution for that..???