小编tnu*_*uis的帖子

通过选择一个OptionButton，我希望活动表单上的所有复选框都取消选中并取消选中。

我可以使用For Each循环取消选择它，但这对于取消选中这些框不起作用。我得到错误：

chB.Value =对象变量或未设置带块变量

Private Sub optB_9201_Click()

Dim ctrl As Control
Dim chB As CheckBox

If Me.optB_9201.Value = True _
  And Me.optB_9251.Value = False _
  And Me.optB_9301.Value = False Then

    Me.img9301_main.Visible = True
    Me.frM9301_View.Caption = "Du har valgt CLX-9201NA med følgende konfigurasjon:"
    Me.frm9301_Equipment.Enabled = True

    For Each ctrl In Me.frm9301_Equipment.Controls
        ctrl.Enabled = False
        chB.Value = False
    Next ctrl

    Me.frM9301_Stand.Enabled = True

    For Each ctrl In Me.frM9301_Stand.Controls
        ctrl.Enabled = True
    Next ctrl

End If

End Sub

如何解决这个问题？

或者：

可能在UserForm上发生更改事件，该事件指出如果CheckBox为Enabled = …

在继续执行脚本之前如何等待网页完全加载？

我知道如果您希望它等待 4 秒，您可以使用延迟 4，但这不够安全。

在 VBA 中，您有一个始终有效的简单代码，如下所示：

Dim x As String\nx = "https://na6.salesforce.com/p/attach/NoteAttach?pid=" & Range("T34").Value & "&parentname=" & Range("T35").Value & "&retURL=%2F0018000000sKz8K%3Fpb0%3Dtrue"\n\n   Set IE = CreateObject("InternetExplorer.Application")\n    IE.Navigate (x)\n    IE.Visible = True\n    SetParent IE.Hwnd, Application.Hwnd\n\nDo\nDoEvents\nLoop Until IE.READYSTATE = 4\n

在 mac 上使用 safari for applescript 相当于什么？

我\xc2\xb4在网上看到了很多版本，但只有类似于延迟或返回指定值或计算页面上的单词数等的解决方法。

我只是想要上面的版本是100%完美的。

先感谢您：）