You are currently reviewing an older revision of this page.
Level overrides key-in for Active File and attached Reference File:
LEVEL SET OVERRIDE COLOR # file:all all
For Nested Reference files you need to set these several things to make the Key-In work correctly.
Set variable:
MS_LEVEL_EDIT_NESTED_ATTACHMENT_LEVELS = 1
Set key-in "set refleveloverrides on" this will retain your settings.
Set key-in: level set override color # file:*.*->*.* all (# has to be set to color desired)
If you wanted all the Level Overrides for nested References to change to the color red, it would be: level set override color 3 file:*.*->*.* all
If you want to target specific levels, the key-in would be: level set override color # file:*.*->*.* level_name
If there was a nested level called 'Walls' and you want to change the override color to green, the key-in would be: level set override color 2 file:*.*->*.* Walls
Key-in doesn't work - use macroThe following code proves the concept in VBA:Sub ChangeOverrideColor()' KeyinArguments is Bentley variable to transfer arguments into VBA' for this method it is used to enter file, level and color information:' key-in vba run <(><<)>module>.ChangeOverrideColor [[<(><<)>filefilter>]<(><<)>levelfilter> ]<(><<)>colornumber>' Consider this a PROOF OF CONCEPT only, without warranty!Dim Arguments() As StringDim LevelFilter As StringDim FileFilter As StringDim ColorNr As LongArguments() = Split(KeyinArguments, " ")ColorNr = Val(Arguments(UBound(Arguments)))If UBound(Arguments) > 0 Then LevelFilter = Arguments(UBound(Arguments)- 1) Else LevelFilter = "*"If UBound(Arguments) > 1 Then FileFilter = Arguments(UBound(Arguments) -2) Else FileFilter = "*"ChangeOverrideColor_Models ActiveModelReference, ColorNr, LevelFilter,FileFilterRedrawAllViewsEnd SubPrivate Sub ChangeOverrideColor_Models(CurrentModel As ModelReference,ColorNr As Long, LevelFilter As String, FileFilter As String)Dim CurrentAttachment As AttachmentChangeOverrideColor_Levels CurrentModel, ColorNr, LevelFilter,FileFilterFor Each CurrentAttachment In CurrentModel.AttachmentsChangeOverrideColor_Models CurrentAttachment, ColorNr, LevelFilter,FileFilterNext CurrentAttachmentEnd SubPrivate Sub ChangeOverrideColor_Levels(CurrentModel As ModelReference,ColorNr As Long, LevelFilter As String, FileFilter As String)Dim CurrentLevel As LevelFor Each CurrentLevel In CurrentModel.LevelsIf CurrentLevel.Name Like LevelFilter _And CurrentModel.DesignFile.Name Like FileFilter _Then CurrentLevel.OverrideColor = ColorNrNext CurrentLevelEnd Sub