MapForums

I have this code in an excel file; the idea being to read two postcodes from cells A1 and B1, and return the distance between them to Cell C1.
I think the code is ok, but when I run it it says "User-Defined type not defined" and highlights the second line.

Do I need to set up a specific tools>reference in Excel VBA first?

Pretty please?!
______________

Sub ShowDistance()
Dim objApp As New MapPoint.Application
Dim objMap As MapPoint.Map
Dim objLocOne As MapPoint.Location
Dim objLocTwo As MapPoint.Location

Dim LocOne, LocTwo As String
Dim Distance As Long

Set objMap = objApp.ActiveMap

LocOne = Cells(1, 1)
LocTwo = Cells(1, 2)

Set objLocOne = objMap.FindResults(LocOne).Item(1)
Set objLocTwo = objMap.FindResults(LocTwo).Item(1)


'Show the distance

Distance = objMap.Distance(objLocOne, objLocTwo)

Cells(1, 3) = Distance

End Sub

Hi Jonboy,

I wrote a tutorial related to this earlier this afternoon which I plan to publish tomorrow --
http://www.mp2kmag.com/update/mappoi...er/2005-04-26/

I think the answer to your question is actually in the Part I of the tutorials.

Eric

__________________

Got it working now, thanks Erik.
Batch files here I come.

Looking forward to part IV (which hopefully will include "fuzzy" address searches *cough* )

I've just tried the code provided in the tutorial part III, but vba keeps on returning the same error message (Run-time error '429': ActiveX component can't create object ...) I'm running Excel 2003 and MapPoint 2004. Is there something I'm missing here?

Thanks for your help!

Check the reference under Tools References, it should not be the ActiveX control.

Also, you might try doing this at the command line mappoint.exe /register

Eric

Hi Eric,
I have tried all the above steps, and also gone through the first tutorial in detail. I still receive the error:
(Run-time error '429': ActiveX component can't create object ...)

Not sure what is going wrong. I am using Office 2007 on Vista home, and using the trial version of MapPoint.
Thanks.

What version of MapPoint? I wonder if it is the MapPoint 2009 trial, if it hangs asking for the Activation code.

Eric

__________________

Eric,
I figured, it was about EU versus NA, and 16 versus 11. Thanks. I now need to fetch distances for multiple origin-destination pairs. Where can I find some sample code for the same?
Do I need to worry about closing and opening MapPoint for each 'fetch'? Or would the application handle 4-5000 distances without crashing?

Thanks for your help.