Bentley Communities
Bentley Communities
  • Site
  • User
  • Site
  • Search
  • User
MicroStation
  • Product Communities
MicroStation
[Archived] AskInga Wiki Active Angle Assistant macro **UPDATED**
    • Sign In
    • -AskInga
      • +3D MicroStation
      • +AccuDraw Secrets
      • +Animation - Rendering
      • +Behind The Scenes
      • +Cells
      • +Colours
      • +Conversion - Translation
      • +Coordinate Input
      • +Design Settings
      • +Dimensions
      • +DWG
      • +EDG
      • -Element Manipulation
        • AccuSnap shortcuts
        • Active Angle Assistant macro **UPDATED**
        • Adjust the holes inside a group hole
        • Align your elements
        • Analyze your curves
        • Auto-drop multi-lines as you place them
        • Automate the locking of your elements
        • Better intersection snapping in V7
        • Bring elements to front
        • Change associative hatch colour
        • Change complex shape to simple shape
        • Change fence mode from status bar
        • Change hatch symbology
        • Change the display order of your elements
        • Change verticies with copy parallel
        • Clipping elements with fences turns them into shapes
        • Combine - merge existing shapes
        • Construct a circle tangent to three lines in pre-XM
        • Construct tangent circles in XM
        • Control pattern-hatch placement
        • Convert simple shapes to linestrings with this VBA
        • Cool graphics with array
        • Copy a complex shape parallel
        • Copy selection sets with the CTRL key
        • Create an element halo with this macro
        • Draw revision clouds in MicroStation XM
        • Draw revision clouds in pre-XM MicroStation
        • Efficient intersection snapping
        • Enabling a disabled AccuSnap
        • Faster flood fills
        • Force input focus into key-in window
        • Get to AccuDraw and PopSet settings faster
        • Get to AccuSnap settings faster
        • Hatch on the active level
        • Hatch selected areas dynamically
        • Hatching alternating areas
        • Hide an element by key-in
        • Hide elements by using named groups
        • Hide elements by using options in right-click menus
        • How to draw a line perpendicular to an arc at a specific point
        • Identify filled shapes by poking on inside
        • If copying from the clipboard doesn't work
        • LA Solutions announces FlexiTable for MicroStation
        • Learning MicroStation is so easy!
        • Lock Tags to prevent manipulation
        • Make move element behave like V7
        • Match and change
        • Measure a distance with copy parallel
        • Measure multiple elements
        • Measure selected areas dynamically
        • Measure slopes, latitudes and departures with this macro
        • MicroStation is easy
        • Missing edit handles
        • Modify - sweeten a b-spline
        • Modify handles for multiple elements
        • Modifying some but not all element handles
        • More on flood fills
        • Move hatch intersection point with ease
        • Multiple copies of something
        • Need lots of holes?
        • Need to flatten a file
        • Place an arc by edge an a smartLine
        • Place an arc by its length in V7
        • Place an arc by its length in V8
        • Place an arc tangent to another element
        • Place an arc tangent to three elements
        • Place cells, line styles and patterns to scale with this macro
        • Place composite curve - default setting
        • Play bingo with GeoGraphics!
        • Pop-Up snaps menu
        • Popup for available tasks
        • Recall AccuDraw keyins
        • Right click on element to exchange into that file
        • Right click on element to open another instance of MicroStation
        • Scale - rotate elements about their origin
        • Stretch your elements without a placing fence
        • Suspending AccuSnap
        • The active angle dialog
        • The rules
        • Toggle between tangent points
        • Total length of lines
        • Transient elements in MicroStation V8
        • Understanding PopSet
        • Unlock angle preservation when manipulating handles
        • Unlock angle preservation when modifying fence vertices
        • Use clipboard operations to salvage pre-edited graphics
        • Use element manipulation tool on references
        • Use multiple cutters with the trim elements tool
        • Use the space bar to toggle the axis lock
        • What drop element has no use fence
      • +Element Properties
      • +Element Selection
      • +Freeware - Shareware
      • +Interface Look And Feel
      • +Internet - E-Links - Links
      • +Keyins
      • +Levels
      • +Line Styles
      • +Models
      • +MSM Archive
      • +Other
      • +Presentations
      • +Printing - Plotting
      • +Programming - Automation
      • +Rasters - Images
      • +References
      • +Tags - Data Fields - Fields
      • +Text - Fonts - Annotation
      • +Views
      • +Windows - Interacting With
      • +Workspaces - Configuration
    • graffiti

    You are currently reviewing an older revision of this page.

    • History View current version

    Active Angle Assistant macro

    AskInga logo

    Original Article Date: Nov 7, 2005

    With thanks to Alexie Karavakis for contributing this VBA macro that allow you to set and get the active angle based on a selected element such as a line, text, cell, or curve. It also contains some cool options for rotating elements. A must have for the managment of your active angle.

    Download 269.zip and extract the contents from the zip file.
    Place both mvbas in the folder pointed to by MS_VBASEARCHDIRECTORIES
    Keyin vba load ActiveAngleAssistant to load the project, or...
    Configure MS_VBAAUTOLOADPROJECTS to automatically load the mvba project upon startup.
    Keyin vba run getangle to open the dialog.

    2010-03-08  Application tested with MicroStation V8i SS1 and it appears to work fine.

     

    Rotate 180 allows you to quickly flip a cell or piece of text by 180 degrees! As a bonus it also works with a fence or selection set!

    Rotate To Selected rotates text or cells to match the angle of another element. Excellent for aligning text!

    Rotate To Active Angle lets you rotate a cell or text element to the current active angle individually, by fence, or by selection set. Note, this doesn't rotate them by the active angle like the Rotate Element command, but rather it rotates the selected elements to that angle.

    Note: When you activate any of the three functions above, you will also be presented with an additional Tool Settings box that allows you to select a couple of rotate options. The animated clips do not show this feature.

    Note: The following angle retrieving functions do not work on a rotated view in a 3D file.


    Set Active Angle by 2 Points sets the active angle based on two data points....it can't get any easier than that!

    Set Start Angle Sets the Start Angle in the Locks dialog by simply selecting an element. The Start Angle is an angle in the range 0-180° degrees, relative to the view x-axis that is used as a starting angle by Axis Lock.

    For those of you who don't use the Axis Lock, now might be a nice time to learn a new thing or two. Essentially, when the Axis Lock is turned on, each data point that you enter is *forced* to lie at an angle (or multiples of that angle) from the previous data point. For additional information, please refer to MicroStation's Help file.


    Get Element Angle sets the active angle to that of the selected element. This particular button is also influenced by the additional settings exposed when you select the little arrow button.


    Add Value to Selected Element will set the active angle to the element of the angle plus the value you enter. You can see this being demonstrated in the clip below. The line is at 25 degrees, but by adding a value of 10 in this field, the active angle is actually set to 35 degrees.

    In addition to adding a custom value to the active angle, you can also poke on the labelled buttons to increase or decrease your active angle by the buttons value.

    These programs are supplied as is. These programs do not come with support. AskInga, Bentley Systems Inc., and the author of these programs assume no liability for damages direct, indirect, or consequential, which may result from the use of these programs. Use these programs at your own risk.

    AskInga Article #269

    Communities
    • Home
    • Getting Started
    • Community Central
    • Products
    • Support
    • Secure File Upload
    • Feedback
    Support and Services
    • Home
    • Product Support
    • Downloads
    • Subscription Services Portal
    Training and Learning
    • Home
    • About Bentley Institute
    • My Learning History
    • Reference Books
    Social Media
    •    LinkedIn
    •    Facebook
    •    Twitter
    •    YouTube
    •    RSS Feed
    •    Email

    © 2023 Bentley Systems, Incorporated  |  Contact Us  |  Privacy |  Terms of Use  |  Cookies