is there a key-in to set the model Line Style properties to compound scale

Hi,

please read and follow the best practices: It's often impossible to answer a question without knowing what product and version (build number) is used exactly.

PH said:

I need a key-in to set the model Line Style Scale properties to Compound Scale.

I think such key-in does not exists. But maybe simple VBA macro, using PropertyEnabler, could do it.

With regards,

  Jan

As suggested by Jan there is no key-in

Following is a VBA snippet to change active Models Line Style Scale to “Compound Scale”

Sub ChangeLineStyleScale()
    Dim sMsg As String
    Dim oPH As PropertyHandler
    Set oPH = CreatePropertyHandler(ActiveModelReference)

    If Not oPH.SelectByAccessString("LineStyleScale") Then
        Debug.Print "LineStyleScale Access String NOT FOUND!!"
    Else
        ' 0 = Global Line Style Scale
        ' 1 = Annotation Scale
        ' 2 = Compound Scale
        oPH.setValue (2)
        
        sMsg = "Active Model LineStyleScale changed to '" & "Compound Scale" & "'"
        MessageCenter.AddMessage sMsg
    End If
    
    CadInputQueue.SendCommand "FILEDESIGN"
End Sub

I was unaware "compound scale" was even an option.

What are the benefits of a compound scale as opposed to a simple "global scale"?

Please check the following Help link for details on "Compound Scale"

https://docs.bentley.com/LiveContent/web/MicroStation%20Help-v17/en/CreateModel.html

Interesting. I can see what it does, but I'm not sure how or when it would be effective.