Advanced Question: How do I set the icon on an Office Add-in?

[Tony Archer]

I have been tasked to write a toolbar add-in button for a project at work.

I have built the button, and everything works great ... EXCEPT.

I cannot for the life of me figure out how to set the icon next to the
caption on the button.

I'm using:

MyButton = oStandardBar.Controls.Item("NNPoC")
If MyButton Is Nothing Then
MyButton = oStandardBar.Controls.Add(1)
With MyButton
.Caption = "PoC Add-In"
.Style = MsoButtonStyle.msoButtonCaption <--------------
......

But would rather use:

.Style = MsoButtonStyle.msoButtonIconAndCaption
Both of these work except the second has no obvious way to set the icon and
I can find no documentation on it.

I would also MUCH rather embed the icon into the binary than have it sitting
out somewhere...if that's possible.

--Tony