How to get extrude cut depth when using through all in vba?

Hello everyone,

I am writing macro in VBA Solidworks 2014 and I cant get the depth of the extrude cut feature when it was created using "through all". .GetDepth function returns 0 as depth. Can anyone please help me with this?

Thanks.

SolidworksApi macros