ms word - VBA to return RGB color of text -


i have been able return rgb colour of text in word document color has been picked using custom colours, not when standard colours used. used below code:

function getrgbtest(colour long) string  getrgbtest = "rgb(" & (colour mod 256) & "," & ((colour \ 256) mod 256) & "," & ((colour \ 256 \ 256) mod 256) & ")"  end function  sub testcolour()  msgbox getrgbtest(selection.font.color)  end sub

when using standard colour, selection.font.color returns negative value , rgb value incorrect.

i have tried editing have following (where dict list of colorindex , respective rgb vals):

function getrgbtest(colour long, colind integer) string  if colour > 0     getrgbtest = "rgb(" & (colour mod 256) & "," & ((colour \ 256) mod 256) & "," & ((colour \ 256 \ 256) mod 256) & ")" else     colind = ltrim(str(colind))     getrgbtest = dict.item(colind) end if end function  sub testcolour()  msgbox getrgbtest(selection.font.color, selection.font.colorindex)  end sub

although think colorindex returns value doesnt relate standard colours.

does have idea how transform these values rgb vals?

i haven't been able google reference, if recall correctly there 3 possible data formats word return font colour in.

rgb format

if high byte &h00 remaining 3 bytes represent red, green, , blue. format familiar , handling.

automatic colour

if value &hff000000 known -16777216 colour set automatic, , black. otherwise assumes default colour document.

mysterious third negative format

if high nibble of high byte &hd, if first digit of hexidecimal representation of number d, uses word colour scheme format.

for example, might &d500ffff second nibble, &h5 in our example, matches value in enumeration wdthemecolorindex. if create translation table translating enumeration msothemecolorschemeindex enumeration, can basic colours in document's activedocument.documenttheme.themecolorscheme collection. why there 2 enumerations different index numbers same thing ask? question! moving on...

this not end of story however! there last 3 remaining bytes worry about! next one, low byte of high word, think it's easy. believe it's &h00. if run different value byte... well, best of luck you.

the last 2 bytes represent percentages darken or lighten value (respectively). &ff or 255 means no change , &h00 means 100%. same in colour picker see things "accent 2, lighter 60%". way &hd500ff66, 5 being index accent 2, &h66 being 60% in lighter byte.

so here function not account lighter , darker values:

public function getbasicrgb(color long) string   dim colorindexlookup   dim colorindex integer   dim finalcolor long   colorindexlookup = array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 2, 1, 4, 3)   colorindex = colorindexlookup( _       ((color , &hf000000) / &h1000000) _       + lbound(colorindexlookup))   finalcolor = activedocument.documenttheme.themecolorscheme(colorindex)   getbasicrgb = "rgb(" & (finalcolor , &hff) & "," & _       (finalcolor / &h100 , &hff) & "," & _       ((finalcolor , &hff0000) / &h10000) & ")" end function

to account lighter , darker believe have convert rgb value hsl value modify l component % lighter or darker. convert rgb. don't care figure out right now.


Comments

Post a Comment

Popular posts from this blog

html - How to style widget with post count different than without post count -

i have border below li elements in wordpress widget types appropriate. element inside set block gives them nice easy click full width. the problem, when choose option "show post count" when adding widget such categories or archives displays post count plain text after tag , because tag block pushes post number text line below. whether choose show post count or not show post count still gives exact same element identifyer example "widget_categories". how style post count not on next line still keep links non post count list items full width? here's example on sidebar www.bbmthemes.com/themes/modular/blog-standard/ in order solve problem need remove display:block; for ul.widgets ul a , add in it's place line-height: 33px; what going achieve have same visual effect. what going lose doing links going work on text , not on "box". the other way out of find post count coming , make changes this. example change text count i
Read more

How to remove text and logo OR add Overflow on Android ActionBar using AppCompat on API 8? -

have researched death , cannot find answer. i have actionbar using appcompat. supporting api v7 (api v8 do). actionbar works api v11. api < v11 has problem of removing icon (and feature) actionbar without supplying overflow. big picture have app logo, app title, , 3 icons squidging same actionbar on low end phone. trying make room! i happy 1 of 2 solutions. either: a method of getting overflow functionality can retrieved pull down. (preferred) method of removing icon , text actionbar below current xml api 11+: <resources> <!-- base application theme api 11+. theme replaces appbasetheme res/values/styles.xml on api 11+ devices. --> <style name="appbasetheme" parent="theme.appcompat.light.darkactionbar"> <item name="android:actionbarstyle">@style/liteactionbarstyle</item> <item name="actionbarstyle">@style/liteactionbarstyle</item> </st
Read more

javascript - storing input from prompt in array and displaying the array -

i want take the inputs user prompt, store input in array, , display it. want take 10 inputs user using for loop. have tried do-while shown below. var givennames = new array(); var pattern = /[\w\d]{1,}/ig; do{ var name = prompt("enter names. letters , digits accepted!\nentering empty field stops asking",""); if(name && name.match(pattern)){givennames.push(name);} } while(name != ""); function displaynames(){ if(givennames.length > 0){ document.getelementbyid("list").innerhtml = "<span style='color:navy;font- weight:bold;'>given names are:<\/span><br><br>" + givennames.join("<br><br>"); } else { document.getelementbyid("list").innerhtml = "<span style='color:navy;font-weight:bold;'>nothing has been given!<\/span>"; } } how replace for loop? var givennames = new array();
Read more