Code VBA pour saisir des données sur une page Web ou IE

VBA Enter Data into webpage – IE Automation using VBA GetElementByID function

Quoi est-ce :

If you are trying to do ie automation or trying to enter data to webpage using VBA then this post if for you. We will show the step by step instructions on how to enter/fill data in ie using VBA.

Pin

Pourquoi est-ce :

This is very helpful when you want to enter or fill multiple fields in a webpage regularly. Or if you want to login to website in a single click without using the browser’s default Remember My Password option etc.

Comment to enter data to webpage using vba

In this example we are using Excel VBA for IE Automation however you can use any VBA supported platform.

Subdivision privée wpieautologin()

Faible ie Comme SHDocVw.InternetExplorer

Set ie = Nouveau SHDocVw.InternetExplorer

ie.Visible = Vrai 

ie.Navigate “https://www.askeygeek.com/wp-admin” ‘we are trying to login to askeygeek.com admin page

Do

DoEvents

Loop Until ie.readystate = 4

‘ie READYSTATE has 5 different status codes, here we are using status 4:

‘Uninitialized = 0

‘Loading = 1

‘Loaded = 2

‘Interactive =3

‘Complete = 4 

Call ie.Document.GetElementByID(“user_login”).SetAttribute(“value”, “testUser”)

Call ie.Document.GetElementByID(“user_pass”).SetAttribute(“value”, “testPass12345”)

 ‘to find the “<input……/>” tag hyper link and to click the button

Set AllInputs = ie.Document.getelementsbytagname(“input”) ‘you can use any tagname as you wish

    Pour Each hyper_link Dans AllInputs

        Si hyper_link.Name = “wp-submit” Then ‘you can use .name, .id etc

            hyper_link.Click

            Exit Pour

        End Si

    Suivant

Do

DoEvents

Loop Until ie.readystate = 3

Do

DoEvents

Loop Until ie.readystate = 4

End Sous

Notes 1: Make sure ‘Microsoft Internet Controls’ is enabled from the Tools – References.

Pin

Notes 2: Right click the webpage to and click View source to find the GetElement values

Pin