Question

我想让VBA导航到一个网站（并且为了争论而让我们说“www.google.com”）并在搜索框中输入搜索值，

我已经打开网站并导航到网站部分完成，但棘手的部分是让vba输入该网站中的任何内容，我读了一些关于发送密钥的事情但是从我收集的内容真的不可靠因为你需要它与活跃的窗口进行交互，这不是真正的保证，这是我到目前为止能够编译的代码，

Sub testing()
    Dim IE As Object

    Sheets ("sheet1")
    Range("P2").Select
    Selection.Copy
    Range("A2:H782").Select
    Sheets("sheet1").Paste
    Range("A1").Select

    Columns("A:M").Select
    Range("M1").Activate
    Selection.ClearContents

    Set IE = CreateObject("InternetExplorer.Application")
    With IE
        .Visible = True
        .Navigate "www.google.com" '
        Do While IE.Busy Or IE.readyState <> READYSTATE_COMPLETE
        DoEvents
        Loop


    End With
End Sub

现在请原谅凌乱的代码，但这又是我第二次尝试这个

在网站的文本框中输入搜索值

0 个答案: