Welcome to MapForums!

Register, sign in, or use Facebook Connect above to join in and participate in the forum.

When you are signed in, this message, the ads in this row, and the red-underlined link ads all go away.

Subscribe to receive our newsletter.
Subscribe Unsubscribe
Results 1 to 4 of 4

Mappoint 2002 euro VBA

This is a discussion on Mappoint 2002 euro VBA within the MapPoint Desktop Discussion forums, part of the Map Forums category; hey all, I hope you can help me. I am trying to make an automated program using excels VBA and ...

  1. #1
    plank is offline Junior Member White Belt
    Join Date
    Oct 2003
    Posts
    8

    Mappoint 2002 euro VBA

    hey all,

    I hope you can help me.

    I am trying to make an automated program using excels VBA and the mappoint linkage.

    What the idea is, that it will ask for a Uk postcode - once given it will go onto mappoint and bring back into a spreadsheet, how close each of 118 other postcodes are.

    This shouldnt be too difficult in my mind - i have a list of all the postcodes in excel and i should be able to get it to lookup off the excel spreadsheet.

    But currently i have tried to just program it with 2 places, yet i still cant get it to return a value.

    I would post the code, but its so confusing with all the things i have tried i am actually going to start again because i dont know where i am.

    Any help much appreciated.

    Regards

    Dan

  2. #2
    plank is offline Junior Member White Belt
    Join Date
    Oct 2003
    Posts
    8

    code i have now done

    some of the code i have now done is

    Sub Macro2()
    '
    ' Macro2 Macro
    ' Macro recorded 06/10/2003 by Daniel Fountain
    '
    Dim MPApp As New MapPoint.Application
    Set MPApp = New MapPoint.Application
    MPApp.Visible = True
    MPApp.UserControl = True
    Dim objMap As MapPoint.Map
    Dim objLoc1 As MapPoint.Location
    Dim objLoc2 As MapPoint.Location
    Dim objCenter As MapPoint.Location

    objLoc1 = objMap.FindAddressResults(, , , , IP21ET)


    '
    End Sub

    yet i keep getting an error saying object or block not defined (and i tried the pcode with a space and with speach marks)

    any ideas?

  3. #3
    Matrices is offline Member Yellow Belt
    Join Date
    Sep 2003
    Posts
    44
    DOn't know about in Excel, but in VB, you use a Mappointcontrol object, open it to the location you want then make it active before you can use it



    Dim objmap As MapPoint.Map
    Dim objLoc As MapPoint.Location
    Dim NA As New MapPoint.GeoMapRegion()
    Dim objpushpin As MapPoint.Pushpin

    AxMappointControl1.NewMap(NA.geoMapEurope)
    objmap = AxMappointControl1.ActiveMap

    objLoc = objmap.GetLocation(53.585083333333, -2.70344, 25)
    objpushpin = objmap.AddPushpin(objLoc, "1")
    objpushpin.BalloonState = MapPoint.GeoBalloonState.geoDisplayName

    Thats how I start my plotting program in vb.net anyways

    Hope this helps

    M

  4. #4
    plank is offline Junior Member White Belt
    Join Date
    Oct 2003
    Posts
    8

    still having probs

    Still having the same/similar probs.

    Any ideas?

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Has anyone got street address with MapPoint Euro 2004?
    By Anonymous in forum MapPoint Desktop Discussion
    Replies: 8
    Last Post: 02-09-2005, 09:13 AM
  2. Is MapPoint 2004 Euro version available yet?
    By Anonymous in forum MapPoint Desktop Discussion
    Replies: 2
    Last Post: 09-19-2003, 10:30 AM
  3. MapPoint 2002
    By Anonymous in forum MapPoint Desktop Discussion
    Replies: 2
    Last Post: 10-29-2002, 12:25 PM
  4. MapPoint 2002
    By Anonymous in forum MapPoint Desktop Discussion
    Replies: 1
    Last Post: 08-16-2002, 08:43 AM
  5. Hello. I am using MapPoint 2002. I am doing a lot ....
    By Anonymous in forum MapPoint Desktop Discussion
    Replies: 1
    Last Post: 06-24-2002, 02:04 PM

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  


1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36