VBA to place data point at intersection of selected lines

I need some help on this.  I have a grid of lines/arcs that I need to be able to select and run the VBA and have it place a data point at the all the intersections of the selected elements.  I have done some reading online, but I dont know enough about VBA in Microstation to get started.  I have attached a screen shot of the grid I am working with.  Actually I am trying to locate these points and using the tracking tool in InRoads I need to find surface elevations at all the intersection points.  I think I can select the lines and then activate the tracking tool in InRoads and then run the VBA to place a data point at all the intersections.  Any help will be greatly appreciated.  

Parents
  • Do you actually want a data  point  or do you mean an active point... they are not the same  a data point  is the left mouse click onto the design plane.. and active point is a object  like a cell but it is view independant ie looks the same no matter want the zoom factor..

    If these lines are all at the same interval you could place the first one and use the copy command or the pipe command...

    Hang on just read the bit about inroads and tracking cant you use the intersect snap tool set permanently on ie double click on the snap tool ..

    but I dont know if the tracking tool in Inroads likes accudraw....

    Lorys

    Started msnt work 1990 - Retired  Nov 2022 ( oh boy am I old )

    But was long time user V8iss10 (8.11.09.919) dabbler CE  update 16 (10.16.00.80) 

    MicroStation user since 1990 Melbourne Australia.
    click link to PM me 

Reply
  • Do you actually want a data  point  or do you mean an active point... they are not the same  a data point  is the left mouse click onto the design plane.. and active point is a object  like a cell but it is view independant ie looks the same no matter want the zoom factor..

    If these lines are all at the same interval you could place the first one and use the copy command or the pipe command...

    Hang on just read the bit about inroads and tracking cant you use the intersect snap tool set permanently on ie double click on the snap tool ..

    but I dont know if the tracking tool in Inroads likes accudraw....

    Lorys

    Started msnt work 1990 - Retired  Nov 2022 ( oh boy am I old )

    But was long time user V8iss10 (8.11.09.919) dabbler CE  update 16 (10.16.00.80) 

    MicroStation user since 1990 Melbourne Australia.
    click link to PM me 

Children
  • I actually want a data point (is. left click on the intersection)  I am currently doing it by setting the intersection snap as permanent and going through and snapping on each intersection and left clicking.  This is a feasible way but not really practical because there are so many points.  The image that I included only shows one flange of the bridge girder.  I have two flanges per girder and 3-6 girders per span and 18 spans on this one bridge alone.  That doesn't include the LT & RT coping and gutterlines that I need elevations on.  I need proposed and existing elevations at all the points also, so snapping on each intersection is very time consuming not to mention that the monotony is enough to drive someone insane.  The girders aren't always parallel to the centerline so the spacing varies and the spacing between the 20th point lines vary depending on the length of the span.