你好,我对visio中的VBA相当陌生,我正在尝试向visio模板添加功能,以便每当将特定形状拖到页上时,就会将页面添加到活动文档中。我查看了MSDN并找到了一个使用Application.ShapeAdded函数的示例,但是我所使用的活动文档似乎没有响应我修改过的代码。私有子Document_ShapeAdded(ByVal vsoShape As Visio.
我正在尝试复制visio页面中的所有形状,并将其作为图像粘贴到Excel中。该图像应该是visio绘图的近距离副本。寻找Excel vba脚本来执行此操作。我可以打开visio,访问形状信息等,但卡在复制和粘贴所有的形状到excel作为一个单一的图像 我尝试了以下几种方法: For j = 1 To intShapeCount 'G