2017-08-30 28 views
0

我添加了一个选项按钮用户窗体和它已经消失在屏幕之外。 我知道它仍然存在,我可以访问它虽然代码。VBA删除用户窗体控制对象,它是离屏

这不是世界末日,但对于完整性,我宁愿把它删除。我无法在用户界面中访问它。很显然,如果我可以在IDE Userform窗口中单击它,我可以轻松地将其删除。

我的想法是,我可以改变它的位置:

Dim x As Variant 

For Each x In Me.Controls 
    Debug.Print x.Name 
    If x.Name = "OptionButton1" Then 
     Debug.Print x.Left & ", " & x.Top 
     x.Left = 1 
     x.Top = 1 
    End If 
Next x 

这工作,但只在运行时。只要程序结束,它就会返回到原来的位置。 FWIW,它的当前位置是240,-528。

有谁知道另一种方式来访问该对象?我也试过

Me.Controls.Remove "OptionButton1" 

它也只在运行时才起作用。

有什么想法?

回答

1

在在顶部下拉列表中的“属性”窗口(F4)选择OptionButton1然后在LeftTop性质发生变化的值。

+0

谢谢@simple人。我几乎从来没有使用这个下拉,并完全忽略它。 –

+0

@brett_x;没问题,我从来没有用过它;) –