I'm a new developer to MP, and only OK w/VBA in excel. I'm trying to write an Excel UDF that calculates the distance between two addresses. I've already been around the net, including here:
http://www.dailydoseofexcel.com/inde...tions/&paged=2 (scroll down)
I'm having trouble with getting the FindAddressResults method to work, though I can make FindResults work fine.
I've beed so fristrated getting this to work, that I've abandon the UDF and am working with a simple plotting script from somewhere on the web. When I run it, I get the following message: "the parameter is incorrect"
Here's my code:
End SubCode:Private Sub mapit() Dim oApp As MapPoint.Application Dim Objloc As MapPoint.FindResults Set oApp = CreateObject("MapPoint.Application.NA.11") oApp.Visible = True Set oBJMap = oApp.NewMap 'From online instructions: object.FindAddressResults([Street], [City],_ '[OtherCity], [Region], [PostalCode], [Country]) '************* 'Samples coppied from MS website '*** Set objLoc = objMap.FindAddressResults("1 Microsoft Way", "Redmond", "WA")(1) '****Set objloc = objApp.ActiveMap.FindAddressResults("One Microsoft Way", "Redmond", , "WA '****** 'My code that doesn't work -- I get "the parameter is incorrect" error Set Objloc = oBJMap.FindAddressResults("4724 Main Street", "Downers Grove", "IL")(1) '****************** oBJMap.AddPushpin Objloc, "NAME" objMap.DataSets.ZoomTo