Need to edge out the competition for your dream job? Train for certifications today.
' sets layer transparency
' Scott Helmers, http://www.VisioStepByStep.com, Scott@VisioStepByStep.com
' 1) The CellsC property of the layer object takes an integer column number; the code below uses a predefined
' enum to identify the color transparency column. Refer to the Visio SDK for enum lists, e.g.,
' 2) The value for color transparency must be <= 1
Const sLayerName As String = "TestLayer"
Dim pg As Visio.Page
Dim lyr As Visio.Layer
Set pg = ActivePage ' get active page
Set lyr = pg.Layers(sLayerName) ' get desired layer
lyr.CellsC(Visio.visLayerColorTrans).FormulaU = 0.5 ' set transparency to 50%
Open in new window
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Please enter a first name
Please enter a last name
Must be at least 4 characters long.
Join and Comment
From novice to tech pro — start learning today.
Premium members can enroll in this course at no extra cost.