Scale Model VBA to change the working units and resolution


	Applies To

	Product(s):	MicroStation
	Version(s):	V8
	Environment:	N\A
	Area:	Essentials
	Subarea:	N\A
	Original Author:	Bentley Technical Support Group

Problem

Need to change the Working Units of a number of Models with a design file

Solution

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!

Scale Model VBA to change the working units and resolution

Problem

Solution

See also