topic Re: VBA Display part appearance color in MsgBox in Inventor Programming Forum

VBA Display part appearance color in MsgBox

bionorica2015 — Thu, 26 May 2022 15:47:19 GMT

Hello

How can I get in vba name of current Appearance (library) and display in MsgBox?

An example color is Copper.

Thanks!

Re: VBA Display part appearance color in MsgBox

MTheDesigner — Thu, 26 May 2022 16:16:08 GMT

If you are in the part workspace you can access it like this. If you are in the assembly workspace you will have to specify a component occurrence first.

Dim oDoc = ActiveDocument
MsgBox(oDoc.ActiveAppearance.DisplayName)

Make sure you use ActiveAppearance.DisplayName and not ActiveAppearance.Name because Name spits out its asset ID not its user readable name.

Re: VBA Display part appearance color in MsgBox

WCrihfield — Thu, 26 May 2022 16:34:02 GMT

Hi @bionorica2015. @MTheDesigner 's response will likely work in iLogic, but since you've got VBA right in your topic name, here is a VBA macro code for doing that same thing.

Sub DisplayAppearanceInMsg() If ThisApplication.ActiveDocumentType <> kPartDocumentObject Then Call MsgBox("This VBA macro only works if a Part document is active.", vbCritical, "") Exit Sub End If Dim oPDoc As PartDocument Set oPDoc = ThisApplication.ActiveDocument Call MsgBox(oPDoc.ActiveAppearance.DisplayName, vbInformation, "Active Appearance DisplayName") Call MsgBox(ThisApplication.ActiveAppearanceLibrary.DisplayName, vbInformation, "Active Appearance Library DisplayName") End Sub

If this solved your problem, or answered your question, please click ACCEPT SOLUTION.
Or, if this helped you, please click (LIKE or KUDOS) 👍.

If you want and have time, I would appreciate your Vote(s) for My IDEAS :bulb: or you can Explore My CONTRIBUTIONS

Re: VBA Display part appearance color in MsgBox

bionorica2015 — Thu, 26 May 2022 16:47:08 GMT

Thank you

Can You answer how You find needed method or property -needed code? Is there vba book or something or secret here?

Re: VBA Display part appearance color in MsgBox

bionorica2015 — Thu, 26 May 2022 16:48:02 GMT

Thank you

Can You answer how You find needed method or property -needed code? Is there vba book or something or secret there?

Re: VBA Display part appearance color in MsgBox

MTheDesigner — Thu, 26 May 2022 16:56:54 GMT

I find this really helpful. https://help.autodesk.com/view/INVNTOR/2019/ENU/
This is for inventor 2019 which is what I am using but generally I just look through object trees one here or in the editor until I find what I need. Don't be afraid to make a test assembly or part and just mess around. It help a lot.

Re: VBA Display part appearance color in MsgBox

WCrihfield — Thu, 26 May 2022 17:09:13 GMT

Hi @bionorica2015. I don't think there is a one stop place to learn all you would need to know super easy or fast. Since Microsoft developed that programming language for their Microsoft Office products, they are probably the best source (Link1, Link2, Link3) for learning the core functionality, but they are often super technical in their language explaining stuff, so it can be hard to follow at first. But down within Inventor's online help page (like the link provided by @MTheDesigner), there is a folder full of 'sample programs' (Link4), and most of those examples are in VBA, so that is a fairly good place to peruse through. I just picked up most of this type of stuff over time by looking at working examples, and doing my own trial and error testing while trying to customize existing stuff or create my own stuff.