我正在尝试将一个形状从一个单元格复制到另一个单元格(因为创建了新的行,所以不需要单独的宏来完成此操作)。 当我使用Ctrl-C和Ctrl-V执行此操作时,然后尝试运行以下宏...b.TopLeftCell cn = .Column*then other stuff to manipulate that cell ...the新形状与旧形状具有相同的.Row和.C
我正在尝试复制visio页面中的所有形状,并将其作为图像粘贴到Excel中。该图像应该是visio绘图的近距离副本。寻找Excelvba脚本来执行此操作。我可以打开visio,访问形状信息等,但卡在复制和粘贴所有的形状到excel作为一个单一的图像 我尝试了以下几种方法: For j = 1 To intShapeCount 'G