hyperlink - Visio VBA filling hyperlinked boxes -
hyperlink - Visio VBA filling hyperlinked boxes -
i proficient in vba when comes excel, not much in visio. want simple. if had hyperlink object, want object filled color blue. in excel, no problem. in visio, not much. flowchart simple enough, 20 objects or , not of them hyperlinked.
here vba psuedo-code might seek in vein of comment above:
dim sh visio.shape dim link hyperlink each sh in visio.activepage.shapes '<~ loop through shapes collection each link in sh.hyperlinks '<~ loop through links collection if not link.address = "" '<~ check blank address sh.cells("fillforegnd") = 2 '<~ apply color shape end if next link next sh
vba hyperlink visio
Comments
Post a Comment