How can I get the distance between 2 parallel planes using VBA?

The planes are in a geometrical set in a part.