VBA UDF Value Error

[sdl5384]

Hello everyone:

I am new to the forum. I am also new to VBA. I admit I am still learning but thought I would be able to do this relatively easily. What I have created is a UDF that helps me calculate the distance between two geographic locations based on latitude and longitude values as arguments.

So far I have not been able to solve the problem with it because it keeps giving me a #VALUE! error. I don't know if it's something simple I am missing or not. Below is my code for the UDF provided for you.

Please Login or Register  to view this content.

I would greatly appreciate whatever help I can get from you.

Thank you for your time and consideration.

S. Thompson

[shg]

Welcome to the board.

	A	B	C	D	E	F	G	H
1	Apt1	Lat1	Lon1	Apt2	Lat2	Lon2	Dist
2	DFW	32.8968	-97.0398	SJC	37.3667	-121.9333	1,436	G2: =3959 * CentralAngle(B2, C2, E2, F2)

Please Login or Register  to view this content.

[Neil_]

Don't know anything about longitude and latitude, but as you are treating them as Doubles, then they must just be numbers, so...

Please Login or Register  to view this content.

as you are subtracting latitude1 from itself then this reads as g = 0 / 2, so at this point will always =0

Please Login or Register  to view this content.

As you have a zero in there (g * g), C1 will always be zero too, as you are multiplying by zero.

Please Login or Register  to view this content.

The function breaks here with a division by zero error. Shoot me if I'm wrong, I don't do maps.

[sdl5384]

SHG:

Thanks a ton! It works perfectly now!