Excel VBA script on formatting shapes -


i making interactive map, 2 sheets. first sheet map sheet line shapes, second database.

i add colouring function according line shapes based on values in database.

i've made plan easier undertanding can found here: http://www.speedyshare.com/gwjwd/plan.xlsm

here code i've tried:

if target.address = sheets("data").range("$c$4:$c$9")     select case target.value         case = 10             sheets("map").shapes(cl.value).line.forecolor.rgb = vbred         case = 20             sheets("map").shapes(cl.value).line.forecolor.rgb = vbblue         case = 30             sheets("map").shapes(cl.value).line.forecolor.rgb = vbgreen     end select end if 


Comments

Popular posts from this blog

java - WrongTypeOfReturnValue exception thrown when unit testing using mockito -

php - Magento - Deleted Base url key -

android - How to disable Button if EditText is empty ? -