MapPoint Forums - View Single Post - Is this possible to SELECT ALL the pushpins ?

**John Meyer** · #2 (**permalink**) 11-25-2002

Vincent, Give the a try, it will delete all pushpins on a map. Change MPC with whatever your MapPoint ActiveX control is named ie:(MapPointControl1)

Code:

Dim objDataSet As MapPointCtl.DataSet
Dim objmap As MapPointCtl.Map

Set objmap = MPC.ActiveMap
    For Each objDataSet In objmap.DataSets
        objDataSet.Delete
    Next

Thread: Is this possible to SELECT ALL the pushpins ? View Single Post

Thread: Is this possible to SELECT ALL the pushpins ?
View Single Post