How to Convert Convert System.Color To Microsoft Word WdColor?

Question

In vb .net, how to typecast System.Color (or) Color.FromArgb(....) To Microsoft.Office.Interop.Word.WdColor?

Looks like this has already been answered, but in c#, not vb: http://stackoverflow.com/a/13075575 if you can't read c#, then if run that answer through a c# to vb converter (there are plenty of them online if you google them) — stormCloud, Mar 26 '16 at 18:15

score 3 · Accepted Answer · edited May 23 '17 at 12:07

You need to convert it to a hexadecimal style RGB:

To quote Cole Cameron's comment from that answer:

Sum the Red, Green, and Blue values of the named color, multiplying the Green & Blue values by hexadecimal modifiers so that the value is effectively 0xBBGGRR (base doesn't really matter, an integer's an integer), then cast that to the WdColor enumeration type.

Example (Converted from Cole Cameron's C# example):

Dim c As Color = Colors.Blue
Dim wdc = DirectCast(c.R + &H100 * c.G + &H10000 * c.B, Microsoft.Office.Interop.Word.WdColor)

How to Convert Convert System.Color To Microsoft Word WdColor?

1 Answers1