Load Plot Style Names

[parkerdepriest]

I am trying to write a routine to load a new Plot Style Table, and then set a certain Plot Style Name to all layers.

 

Here is the code I use to set the new Plot Style Table, and it works fine:

 

(vla-put-StyleSheet
   (vla-get-ActiveLayout
 	(vla-get-ActiveDocument (vlax-get-acad-object))
   )
   "BCR Plot Style.stb"
 )

 

My problem is that it seems like the Plot Style Names have to be "loaded" manually. When I run

(dictsearch (namedobjdict) "ACAD_PLOTSTYLENAME")

 

it *should* show me the new plot style names, but it doesn't, not until I've gone into the Layer Property Manager and changed a layer to each of the new Plot Style Names once.

 

Please help!