TENGO EL SIGUIENTE CÓDIGO EN VBA , TENGO UN FORMULARIO , DENTRO DE ÉL UN DATAWEBBROWSER Y UN BOTÓN , EL BOTÓN ME DIRIGE A GOOGLE Y ESCRIBE VISUAL BASIC Y LE DA CLICK, PERO SI LO APRETO OTRA VEZ NO CARGA BIEN, PODRÍAN AYUDARME POR FAVOR, GRACIAS.
Private Sub Command1_Click()
With WebBrowser1
.Visible = True
.Navigate "http://www.google.com.ar/"
Do While .Busy = True: DoEvents: Loop
.Document.f.q.Value = "Visual Basic"
.Document.f.btnG.Click
End With
End Sub