VISIO图层妙用Word文档格式.docx
《VISIO图层妙用Word文档格式.docx》由会员分享,可在线阅读,更多相关《VISIO图层妙用Word文档格式.docx(8页珍藏版)》请在冰豆网上搜索。
第二步给处理3添加图层
先选中处理3的所有流程图,右击->
格式->
图层,
3.3
在弹出的对话框中添加新的图层,命名为"
处理3"
勾选“处理3〞
4.4
第三步测试添加的图层是否好用
①工具栏右击->
视图
②点击视图工具栏最后一个"
图层属性"
,在名称为"
的"
可见"
属性上取消勾选,点击应用可以看到"
可以被隐藏掉,证明图层隐藏好用
5.第四步录制宏
①录制一个宏,命名为"
HideAndShow"
②找到宏代码如下:
SubHideAndShow()
DimUndoScopeID1AsLong
UndoScopeID1=Application.BeginUndoScope("
)
SetvsoLayer1=Application.ActiveWindow.Page.Layers.Item(3)
vsoLayer1.CellsC(visLayerVisible).FormulaU="
0"
Application.EndUndoScopeUndoScopeID1,True
EndSub
6.工程视图
7.宏代码
8.第五步修改宏代码
①修改
把
替换成:
IfvsoLayer1.CellsC(visLayerVisible).FormulaU="
Then
vsoLayer1.CellsC(visLayerVisible).FormulaU="
1"
Else
EndIf
②修改后的宏代码如下
IfvsoLayer1.CellsC(visLayerVisible).FormulaU="
Else
EndIf
9.第六步添加按钮
右击工具栏->
开发工具->
插入控件,选择
MicrosoftForms2.0mandButton
10.修改按钮名称为"
显示/隐藏流程"
11.第七步关联按钮和录制的宏
右击按钮->
命令按钮对象->
查看代码,打开看到如下代码:
PrivateSubmandButton1_Click()
12.修改代码,把以上代码修改如下:
HideAndShow
保存代码、关闭代码、保存文件
13.第八步测试
现在,大功告成,可以点击按钮试试看功能是否好用
点击按钮
14.点击按钮
END
须知事项
∙在第八步以前,按钮需要是"
设计模式"
第八步测试时候,按钮必须是"
非设计模式"
;
在"
开发工具"
工具栏最后一项设置按钮模式
请问VISIO2013中如何隐藏和显示一个图层?
点击显示和隐藏,能够实现最好了谢谢!
图层选项里设置