1、vba遍历要添加引用，runtime
2、不能打开单独的application，因为在获取到shape的picture属性时候，新打开的application不能够获取到。提示自动化错误。
3、定位shape的话，需要shape的宽高，因为是基于中心点的定位。CellsSRC(visSectionObject, visRowXFormOut, visXFormPinX).FormulaU
设置属性的格式如此，没有好办法了。
4、shape的name，text可以赋值，通过name的唯一性来判断是否已经完成插入shape到visio文档的page。
5、打开文档，add，open都可，close掉就行
对象级：application、window、document、page、shape
关于Visio的vba操作，遍历目录，对所有vsd文件操作，导入excel文件
原文：http://www.cnblogs.com/Running_Zhang/p/5636888.html