Question

我试图使用activeX Web控件在excel上打开一个网页。当使用导航按钮控件时，它会工作罚款，但是当我更改工作表并单击一个单元格时，它会给出“错误424对象是必需的”（不确定翻译是否正确）知道该怎么做吗？

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 1 Then
        If Not Cells(1, Target.Row).Value Is Nothing Then
            Worksheets("Browser").WebBrowser1.Navigate "http://127.0.0.1?loc=" & Target.Value
        End If
    End If
End Sub

提前致谢

Answer 1

问题不在于您的web浏览器控件，而是您的if语句（我怀疑代码在该行停止）。具体来说，Is Nothing的使用在这里是错误的。而是测试字符串""或vbNull的单元格值。

If Not Cells(1, Target.Row).Value = vbNull Then

单击单击时打开activeX控件上的超链接

1 个答案: