MsgBox TypeName(plPath.Coordinates) ' Double
MsgBox UBound(plPath.Coordinates) ' 7
MsgBox IsArray(plPath.Coordinates) ' True
MsgBox plPath.Coordinates(0) ' Ошибка 451: Property let procedure not defined and property get procedure did not return an object