Hi!

I have a formula in excel I want to convert it into vb. how to do it.

IF(P2AZ-P1Z=0, IF(P2AX>P1X, PI()/2, PI()/2*3), IF(P2AZ>P1Z, (ATAN((P2AX-P1X)/(P2AZ-P1Z))),(ATAN((P2AX-P1X)/(P2AZ-P1Z)))+PI()))
Answer is 1.5392375569989

and

IF(P2X-P1X=0, IF(P2Y>P1Y, PI()/2, PI()/2*3), IF(P2X>P1X, (ATAN((P2Y-P1Y)/(P2X-P1X))),(ATAN((P2Y-P1Y)/(P2X-P1X)))+PI()))
Answer is
2.17889125102027
Thanks,

Avinash