Community of MapPoint and Bing Maps Users and Developers
This is a discussion on Start local Mapapoint 2009 within the MapPoint Desktop Discussion forums, part of the Map Forums category; I am trying to use the vba module that comes with my MSContacts program to open my local MapPoint program ...
| |||||||
| Today's Posts | Twitter Feed | Register | Blogs | FAQ | Members List | Calendar | Search | Today's Posts | Mark Forums Read |
| |||
| Start local Mapapoint 2009 I have done very little vba programming in the past few years. Any help with this will be greatly appreciated. Here is what I have now. It seems to hang on the call of the sub. Code:
Function OpenMap(Address, City, State, Zip, Country)
Dim strAddress As String
strAddress = Nz(Address)
strAddress = strAddress & IIf(strAddress = "", "", ", ") & Nz(City)
strAddress = strAddress & IIf(strAddress = "", "", ", ") & Nz(State)
strAddress = strAddress & IIf(strAddress = "", "", ", ") & Nz(Zip)
strAddress = strAddress & IIf(strAddress = "", "", ", ") & Nz(Country)
If strAddress = "" Then
MsgBox "There is no address to map."
Else
Call OpenMP
End If
End Function
Public Sub OpenMP()
Dim objApp As New MapPoint.Application
objApp.Visible = True
objApp.UserControl = True
objApp.OpenMap "strAddress"
End Sub
Application.FollowHyperlink "http://maps.live.com/default.aspx?where1=" & strAddress |
| ||||
| Re: Start local Mapapoint 2009
I'm not familiar with MSContacts, but if it is anything like Excel or Access VBA, try the debugger.. you can single step each of the lines of code to see where it is hanging or breaking down. Also, there are several Excel VBA samples here -- Working With Excel and MapPoint - MP2K Magazine Eric
__________________ |
![]() |
| Tags |
| 2009, local, mapapoint, start |
| ||||
| Posted By | For | Type | Date | |
| Reverse Geocoding, Pt. III - MapPoint Articles - MP2K Magazine | This thread | Refback | 01-29-2009 11:33 AM | |
| The Magazine for MapPoint - MP2K Magazine | This thread | Refback | 01-26-2009 05:01 AM | |
Currently Active Users Viewing This Thread: 1 (0 members and 1 guests) | |
| Thread Tools | |
| Display Modes | |
| |
| ||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| MapPoint 2009 / Streets & Trips 2009 | VirtualEarth MSDN Blog | Bing Maps Blogs & Tweets | 1 | 07-14-2008 06:52 PM |
| One Start, multiple Ends | Garf | MapPoint Desktop Discussion | 5 | 10-16-2006 09:44 AM |
| How Do I get My app to start with Mappoint ? | P_Hairy | MapPoint Desktop Discussion | 2 | 01-15-2006 09:07 AM |
| Find a start of line | Anonymous | MapPoint Desktop Discussion | 5 | 08-03-2004 07:39 PM |
| Is there an easy way to change the start and end t.... | Anonymous | MapPoint Desktop Discussion | 1 | 07-19-2002 12:49 PM |