MapForums

I have dataset has multiple pushpins.

when activemap gets new dataset
How can I get activemap to zoom in or out show all pushpins?

Thanks

Hey Xrok

Use the ZoomTo method on the DataSets Collection or a Dataset Object

Example
Sub ZoomToPushpinSet()

Dim objApp As New MapPoint.Application
Dim objMap As MapPoint.Map
Dim objPin As MapPoint.Pushpin

'Set up the application
Set objMap = objApp.ActiveMap
objApp.Visible = True
objApp.UserControl = True

'Add a Pushpin to the map
objMap.AddPushpin objMap.FindResults("San Jose, CA")(1)

'Zoom to all the Pushpin sets
objMap.DataSets.ZoomTo
' or Zoom to the new Pushpin Set
objMap.DataSets.item("My Pushpins").ZoomTo
End Sub

Note: "My Pushpins" can be an integer index. I think the most recently created dataset is index 1 but best to refer by them by name to be sure.

Ciao,

__________________
Calv1ns

Hi,

I think 'my pushpins' is always index 1. However you are rith to refer by name in case of forward compatibility.

__________________
rgds, Wilfried Mestdagh
www.mestdagh.biz
MapPoint coding demo
Order MapPoint 2009 with Routing and User Tools Spreadsheet

That help me get to do what I want a accomplished.

Thanks