Browse By Tags

  • Extracting values from data fields existing in a cell border.

    Hi I'm looking for something simple to extract a specific part set of data fields from a drawing border. The border exists as a .cel in the drawing and there are four data fields i would like to extract to excel preferably. The data fields are numbered…
  • speedikon Stapelbetrieb (Elementreport) funktioniert nicht immer

    Hallo, ich möchte mittels Stapelbetrieb den Elementreport "LuftRaum" in den Geschossen 1-4 automatisch starten. Leider funktioniert der Stapelbetrieb nur gelegendlich.. ich konnte leider noch keinerlei Hinweis darauf finden, warum das so passiert…
  • RE: How to track undo event

    Unknown said: In my opinion it's hardcoded inside MicroStation and cannot be change in any way. I have noticed an option to modify menu item using inbuilt-wizard (Tools -> Tool Boxes -> Customize -> Menu Bar -> Modify). Is this same can be accomplish…
  • RE: Find intersection point of a line passing through a plane

    Plane3dIntersectsRay3d method fails for a particular element. How to fix this issue? Sample code is given below and the Sample DGN is also attached. Option Explicit Public Sub testPlaneIntersectRay() Dim shp As ShapeElement Dim lin As LineElement…
  • Find intersection point of a line passing through a plane

    I would like to get the intersection point of a 3D line which passes through a plane using MicrostationVBA (Microstation Version : 08.05.01.25 Windows x86). Attached image for reference. I want to obtain the point(3D) at which the line (green line element…
  • IViewUpdateEvents

    I had developed a program using vba. It was executed successfully in Microstation V8. But in Microstation v8i[Select series 1] - version 08.11.07.171, the same program doesn't work and there is no compile error/runtime error also. How to fix this? Kindly…
  • Get CoordSystem

    I am trying to use a vba wrapper declaration which is given below. But how to get the value of coordsystem using vba which in turn used as a input parameter for the below given wrapper declaration. Declare Sub mdlView_getViewRectangle Lib "stdmdlbltin…
  • RE: Export All the CoOrdinates

    Hai Jan, I have to just export the CoOrdinates for a collection of dgn files. As you mentioned, the functionality which is available in Microstation by default, is well enough for my purpose. But in case of many dgn files, it would be a time consuming…
  • Export All the CoOrdinates

    Hai, I want to export the CoOrdinates of all elements in a dgn. How to perform this by using vba? [Microstation version 0.8.05.01.25 Windows x86]
  • Level Properties - Usage

    In Level Manager, the level properties dialog box has a tab named 'Usage' which contains the detailed count of various type of elements available in that particular level(refer attached screenshot). How to get that element count details using VBA?
  • RE: Boundary points of raster

    Hai Mathieu, Please find the below screenshot. In that white colored object represents the raster(Input) and Magenta colored text represents the boundary points(Output) which I want to produce using MicrostationVBA.
  • Boundary points of raster

    How to get the boundary points co-ordinates(not the range) of a attached raster using Microstation VBA?
  • RE: How to get the shared length between two linestring?

    Hi Artur, I attached a simple screenshot for your reference, in which the blue and yellow colored elements represents two individual line elements and the Magenta color represents the shared part/length between them. Hi Jan, By using object .…
  • How to get the shared length between two linestring?

    I want to get the shared length between two linestring. How to achieve this using vba?
  • How to get the points inside smart solid?

    I am using Microstation Version 08.05.01.25 Windows x86. I want to get the points(line element) which falls inside the tube(Smart solid) element. How to achieve this using VBA? Example is given in the below screenshot for your reference, the cyan colored…
  • Get intersection points for unconnected line

    How to get the intersection point between two unconnected lines using vba (similar to intersect snap) as shown in screenshot given below?
  • How to get the shared area between two shape/complex shape element?

    I want to get the shared area between two shape/complex shape element. How to achieve this using vba?
  • How to Get intersection points for 3D elements using vba

    By default object .GetIntersectionPoints( Intersector , Rotation ) method, returns apparent intersections, ignoring differences along the Z-axis. But I need intersections without ignoring differences along the Z-axis. Is there method/option available…
  • How to use point3d as optional argument

    I try to use a point3d parameter as optional argument as given in the below code. But it produces a "compile error: Constant Expression required". How to solve this? Private Sub test(Optional testPoint As Point3d = Point3dZero) ''Some code End Su…
  • Microstation Form Export

    Hi, I have created a microstation macro that can search for all ".DGN" files in a specific folder that the user chooses. below is the code i have written to do so: --------------------------------------------------------------------------------…
  • RE: GetIntersectionPoints method

    No. If you zoom-in closer to that connected point, there is a gap of 0.000033m will be available. i.e. the two lines are not connected/intersected. Refer the attached screenshot for more details.
  • GetIntersectionPoints method

    I am using (LineElement.)getIntersectionPoints method to find the number of intersection points between two specific line elements. In some case, there is no intersection between the lines. But the getintersectionPoints method returns a intersection point…
  • AccuDraw Status

    Using VBA, how to check whether AccuDraw is activated or not?
  • Modify Function Keys

    Is there any option to modify the string for a particular key in Function Keys[.mnu] using VBA?
  • Create toolbar

    At present I am using form with a group of buttons to invoke various method/functions in VBA. Since form occupies more space, I wish to use toolbar. Is there any option to create customized toolbar in Microstation? [I am using Microstation Version 08…