Hi Guys These 2 lines of code: Dim xxxxRS As ActualMap.Recordset = Map1.Identify(Map1.Extent.Center, 5) Dim zoompoint As ActualMap.Point = Map1.Extent.Center The first line - Map1.Extent.Center has values...
