"Align" AutoCAD command

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.

Parents Reply Children
  • In MS we do not have the same function.

    I'll just leave this here (best viewed full-screen @ 1080p60 HD)

  • Barry that is cheating........  custom tool  but nice one.  next question is where do the users find it Slight smile

  • But is it a custom tool?

    Yes it's a custom tool that I made yesterday. I couldn't quite recall how AutoCAD's align tool worked so I watched a video to refresh my memory and after seeing its operation I was pretty certain the same could thing could be achieved in MicroStation so creating this tool it was more a personal challenge to see if I could.

    Barry that is cheating........  custom tool  but nice one.  next question is where do the users find it

    Well, I hadn't really intended on making the tool for public use but I guess there is no problem letting it be available for anyone that want's to use it. While it is functional and appears to be working perfectly fine, I've got some tidying up to do with its coding before I would want to make it available for download.

  • 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.mvba
    AlignbyPoints.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):

    1. On the Menu bar, go to Workspace\Configuration.
    2. Scroll to the bottom of the Category section and select Visual Basic for Applications
    3. Under Visual Basic for Applications Settings, click on the 'Directories to Search....' entry
    4. In the expansion box, take note of any folder paths listed there (if you have multiple you will need to decide which folder to use).
    5. Use Windows Explorer browse to one of those folders and drag & drop the AlignByPoints.MVBA file into the folder

    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.Locate

    like so....:

    The tool has been coded to only work with the following Element Types:

    • Lines & Linestrings
    • Shapes & Complex Shapes
    • Groups, Normal Cells & Shared Cells
    • Complex Chains
    • Arc's, Circles & Ellipses
    • Bspline Curves
    • Text & Text Nodes

    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.