代码之家  ›  专栏  ›  技术社区  ›  redtuna

如何将形状存储到变量中?

  •  0
  • redtuna  · 技术社区  · 16 年前

    以下Visio宏(使用VBA)旋转当前选定的形状:

    ActiveWindow.Selection.Rotate90
    

    Dim s1 as Shape
    Let s1 = ActiveWindow.Selection
    s1.Rotate90
    

    这段代码没有编译,它给了我一个关于“选择”的“参数非可选”错误。

    如果我尝试选择(1),我会得到“对象变量或块变量未设置”,我猜这是VBA抱怨选择中只有一个对象的方式。

    1 回复  |  直到 9 年前
        1
  •  2
  •   Beatles1692    16 年前

    你应该在这里使用Set而不是Let。