有谁知道如何将形状填充设置为透明?
我尝试了以下代码,但无效。
$AppVisio = New-Object -ComObject Visio.Application
$AppVisio.Visible = $false
$docsObj = $AppVisio.Documents
$DocObj = $docsObj.Add("Basic Diagram.vst")
$pagsObj = $AppVisio.ActiveDocument.Pages
$pagObj = $pagsObj.Item(1)
$Shape = $AppVisio.ActiveWindow.Page.DrawRectangle(0.315, 0.397, 3.315, 8.015)
$Shape.FillStyle = "Transparent"
感谢。
答案 0 :(得分:0)
使用Visio,影响外观,大小和位置的大多数属性都存储在ShapeSheet中。因此,您需要找到正确的单元格来解决,在这种情况下,FillForegndTrans
。所以你的行应该是:
$Shape.CellsU('FillForegndTrans').FormulaU = '50%'
如果您不熟悉ShapeSheet,您可能会发现这个有用的背景:
http://visualsignals.typepad.co.uk/vislog/2007/10/just-for-starte.html