Is there a similar key-in in MicroStation about "Align" command of AutoCAD?
Or do I have to move the element first and then rotate it with 3 points?
I have tried the key-in: DWG ALIGN unsuccesful.
thanks.
Try key-in: ALIGNEDGE
It is in the Manipulate Tools. Align Elements by Edge. It works for text too.
Hi.
Do you know the "align" command in AutoCAD?
AlignEdge (MicroStation) is not the same because it does not rotate the selected elements just move them.
Ok, I have reviewed and tidied up the code this morning. Attached is the MVBA file and a basic replication of the AutoCAD Align icon is also provided for anyone that wishes to use it (refer to the help file for how to use the Customize Dialog to import icons and create a custom Tool/Toolbar)
AlignByPoints.mvbaAlignbyPoints.ico
For those of you not familiar using 3rd Party VBA Tools read on (Note I am only providing instructions for V8i as I do not use CONNECT Edition though I'm sure the process will be somewhat similar):
Note: an alternative approach replacing steps 1-4 is to use the following keyin and copy your chosen folder path from the result in the message center:
expand echo $(MS_VBASEARCHDIRECTORIES)
To run the tool manually use this keyin:
vba run [AlignByPoints]modMain.Locate
If you are creating a custom tool via the Customize Dialog (recommended) use this keyin:e,vba run [AlignByPoints]modMain.Locatelike so....:
e,vba run [AlignByPoints]modMain.Locate
The tool has been coded to only work with the following Element Types:
The tool is currently designed for 2D only (results in a 3D file are yet untested but may work as expected) although I plan to develop it further for 3D use and perhaps also include the option to keep the original element in place as well i.e. making it copy instead of move. The tool will also now remain active instead of having to restart it each time as could be seen in the previous YouTube video (right-clicking after aligning an element will end the tool and revert to the Element Selection command).
I've eliminated the only testing error I found earlier but if you discover something that doesn't appear to be working, let me know.
Thank you!!!
MaryB
Power GeoPak 08.11.09.918Power InRoads 08.11.09.918OpenRoads Designer 2021 R2
Thank you Barry
Ian Lapper said:Thank you Barry
MaryB said:Thank you!!!
You're both welcome
Barry, thanks for providing this tool. I was able to load this into CONNECT and upon a simple test I was able to use it to move & rotate a simple rectangle shape to a simple line. I did not do any further testing, but I did not have any issues loading or running the vba. This will be a nice addition and it is something that should be incorporated into the standard tools.
Microstation CONNECT 10.17.00.209
ORD CONNECT 2021 R1 10.10.1.3
Microstation v8i SS 10 08.11.09.919
Power InRoads v8i 08.11.09.615
ProjectWise 10.0.3.453