Sub submit_form()
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
ie.Navigate "http://www.somewhere.com"
While ie.busy
DoEvents
Wend
ie.Document.getElementById("password_textbox").Value = "secretpassword"
ie.Document.getElementById("submit_form").submit()
'or
ie.Document.getElementById("button_id").fireEvent("*******")
End Sub