Kim*_*son 1 excel vba excel-2007 excel-vba
我写了一些VBA代码来创建一些用于GUI的形状,但我试图确保形状不会打印.由于我是动态创建这些形状,因此无法手动将每个形状设置为不打印.有没有办法以编程方式进行?
Set roundedRec = ws.Shapes.AddShape(msoShapeRectangle, 10, 10, 10, 10)
roundedRec.Name = shapeName
With roundedRec
.Fill.Visible = msoFalse
.Line.ForeColor.RGB = RGB(0, 204, 0)
.Line.Style = msoLineThinThin
.Width = target.Width + 4
.Left = target.Left - 2
.Height = target.Height + 4
.Top = target.Top - 2
.ZOrder (msoSendToBack)
' need a way to set the shape to NOT print...?
end with
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
3068 次 |
| 最近记录: |