shapes集合为何是空值？

jaxxcyh

dim shps as shapes
set shps =shapes
定义一个新的shapes对象后，一切回归正常。哪怕再删除这两句，回到从前，也再也见不到 shapes 的影子。

醉眼看尘世

有的，怎么可能是空集合

1. Sub test()
   
2. Dim ShPs As Shapes
   
3. Set ShPs = Sheet1.Shapes
   
4. Stop
   
5. End Sub
   

复制代码

jaxxcyh

醉眼看尘世 发表于 2024-8-11 13:19
有的，怎么可能是空集合

晕，我说的是没定义shapes类型变量之前，本地窗口里出现了一个shapes项，且为空值。好好审题，在1楼。

沈默00

WPS也这样，，重新定义一个变量就有了

醉眼看尘世

jaxxcyh 发表于 2024-8-11 14:51
晕，我说的是没定义shapes类型变量之前，本地窗口里出现了一个shapes项，且为空值。好好审题，在1楼。

好吧。我同意你的研究，希望你找出答案了能@我下。+U少年

沈默00

再看一下sheets,同样没有
原因应该是一样的，，，类

xbox1210

演示一下，希望你能理解问题在哪里。

jaxxcyh

xbox1210 发表于 2024-8-11 20:51
演示一下，希望你能理解问题在哪里。

你是先用了一下shapes，然后删了，接着它就出现空值了，这什么道理？