Need to change the Working Units of a number of Models with a design file
This Scale Model VBA can be run to change the working units and resolution settings.
ScaleModels.zip
The VBA will scale all Models but only allow for one cell library to be ran through at a time. The reason that this Vba is not automatic is because it requires user intervention.
To Run this Vba:
Place "scalemodels.mvba" into the default location:
C:\Program Files (x86)\Bentley\Workspace\System\vba\examples
Within MicroStation open the Cell Library to be scaled:
> Utilities > Macros > Project Manager >
Browse to the directory were the Vba is located and double click on the ScaleModels VBA from the list.
Select Run and another Dialog box should appear as a Warning then select OK.
The Rescale dialog box will display with options to change the working units and resolution.
An option will allow for Saving the settings to this change, select that option.
To proceed with this process select GO!
http://communities.bentley.com/products/programming/microstation_programming/f/343173/t/91234