在网站上的文本框中inputsearch值

我试图让VBA导航到一个网站（为了争辩说“www.google.com”）并在search框中键入search值，

我已经得到了开放的网站和导航到一个网站的一部分完成，但棘手的部分是让vbainput任何东西在网站上，我读了一些关于发送密钥，但从我收集它是真的不可靠，因为你会需要它与活动窗口进行交互，这是不是真的保证，这是我能够编译到目前为止的代码，

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 

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