我有一个Visio绘图，我希望能够从中选择形状并根据某些变量将它们粘贴到其他工作表中。
在页面上选择不同形状的代码是什么。我正在尝试这个但它没有用。
Dim vsoSelection As Visio.Selection
vsoSelection.Select Visio.Shape(1), visSelect
我在这里缺少什么？
还可以将输入文本框的字符串输入Visio吗？
答案 0 :(得分：2)
我假设您收到错误，因为您的vsoSelection对象什么都没有。所以你需要这样做： 设置vsoSelection = ActiveWindow.Selection