Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
A.Acheson
in reply to: dleesuk

Hi @dleesuk 

Your error message is your referencing an object without telling the program where to source the object. And further more. The sample I supplied earlier was just looking at note 1 to pick up the style. What you need to do is look at the styles Manager to pick up your standard list of styles( the drop down list in the drawing when you select the note). 

 

Here is a link to the start point of that the drawingdocumentstyles manager.

 

You would need to follow the objects down to an item within notes collection. Or you can do the opposite and follow it back from general note.style and check the accessed from collection at the bottom, see image. 

Syntax DrawingDocument.StylesManager() As DrawingStylesManager

 

Syntax

DrawingStylesManager.TextStyles() As TextStylesEnumerator

 

 

 

Dim oStlMgr As DrawingStylesManager = oDoc.StylesManager

Dim oTextStyle as TextStyle = oStlMgr.TextStyles.Item(1)

 

 

 

If this solved a problem, please click (accept) as solution.‌‌‌‌
Or if this helped you, please, click (like)‌‌
Regards
Alan