Hi All,
I need help and suggestions: I had a list of contacts and their details its a bulk. I need to verify those names and contact details are matching with my database site or not. In detail my database site user interface have search option if I give name of person with id he have if it matches it shows else throws error. so I needs help & suggestion do I can make a macro using excel that can run bulk contacts validation and give output as true if matches or if not as false. in this way I am thinking or please suggest me is der any other way or script that helps me to do this bulk validation check.
I need to validate person contact with database where I cannot extract details list from db in any format that is constraint so only option I need to type and search contacts and validate so help me how can I automate this validation process. Thanks in advance,........for help and support.
code I tried but this opens website but will not search data:
Private Sub IE_Autiomation()
Dim i As Long
Dim IE As Object
Dim objElement As Object
Dim objCollection As Object
' Create InternetExplorer Object
Set IE = CreateObject("InternetExplorer.Application")
' You can uncoment Next line To see form results
IE.Visible = False
' Send the form data To URL As POST binary request
IE.Navigate "https://brokercheck.finra.org/";
' Statusbar
Application.StatusBar = "www.brokercheck.finra.org is loading. Please wait..."
' Wait while IE loading...
Do While IE.Busy
Application.Wait DateAdd("s", 1, Now)
Loop
'Find 2 input tags:
' 1. Text field
' <input placeholder="CRD#" class="ng-pristine ng-valid flex-auto ng-empty ng-touched" name="s" size="24" value="" type="text">
'
' 2. Button
'
Application.StatusBar = "Search form submission. Please wait..."
Set objCollection = IE.document.getElementsByTagName("input")
i = 0
While i < objCollection.Length
If objCollection(i).Name = "s" Then
' Set text for search
objCollection(i).Value = "excel <acronym title="visual basic for applications">vba</acronym>"
Else
If objCollection(i).Type = "submit" And _
objCollection(i).Name = "" Then
' "Search" button is found
Set objElement = objCollection(i)
End If
End If
i = i + 1
Wend
objElement.Click ' click button to search
' Wait while IE re-loading...
Do While IE.Busy
Application.Wait DateAdd("s", 1, Now)
Loop
' Show IE
IE.Visible = True
' Clean up
Set IE = Nothing
Set objElement = Nothing
Set objCollection = Nothing
Application.StatusBar = ""
End Sub
this what i tried i googled almost so please help me.
1. when name or number of person is give in column A, When macro runs it should go website and search that number/name by searching on webpage and extract data to column b.
2.i 60000 names and number of people need to validate those id/contact person are same? so please help to make my work easy.
3. my final aim is when i paste a bulk id's or name in column a and run macro it should search 1 by 1 in web page and extract that result from web page and paste it in column b.
all your help most appreciated thanks in advance.
I need help and suggestions: I had a list of contacts and their details its a bulk. I need to verify those names and contact details are matching with my database site or not. In detail my database site user interface have search option if I give name of person with id he have if it matches it shows else throws error. so I needs help & suggestion do I can make a macro using excel that can run bulk contacts validation and give output as true if matches or if not as false. in this way I am thinking or please suggest me is der any other way or script that helps me to do this bulk validation check.
I need to validate person contact with database where I cannot extract details list from db in any format that is constraint so only option I need to type and search contacts and validate so help me how can I automate this validation process. Thanks in advance,........for help and support.
code I tried but this opens website but will not search data:
Private Sub IE_Autiomation()
Dim i As Long
Dim IE As Object
Dim objElement As Object
Dim objCollection As Object
' Create InternetExplorer Object
Set IE = CreateObject("InternetExplorer.Application")
' You can uncoment Next line To see form results
IE.Visible = False
' Send the form data To URL As POST binary request
IE.Navigate "https://brokercheck.finra.org/";
' Statusbar
Application.StatusBar = "www.brokercheck.finra.org is loading. Please wait..."
' Wait while IE loading...
Do While IE.Busy
Application.Wait DateAdd("s", 1, Now)
Loop
'Find 2 input tags:
' 1. Text field
' <input placeholder="CRD#" class="ng-pristine ng-valid flex-auto ng-empty ng-touched" name="s" size="24" value="" type="text">
'
' 2. Button
'
Application.StatusBar = "Search form submission. Please wait..."
Set objCollection = IE.document.getElementsByTagName("input")
i = 0
While i < objCollection.Length
If objCollection(i).Name = "s" Then
' Set text for search
objCollection(i).Value = "excel <acronym title="visual basic for applications">vba</acronym>"
Else
If objCollection(i).Type = "submit" And _
objCollection(i).Name = "" Then
' "Search" button is found
Set objElement = objCollection(i)
End If
End If
i = i + 1
Wend
objElement.Click ' click button to search
' Wait while IE re-loading...
Do While IE.Busy
Application.Wait DateAdd("s", 1, Now)
Loop
' Show IE
IE.Visible = True
' Clean up
Set IE = Nothing
Set objElement = Nothing
Set objCollection = Nothing
Application.StatusBar = ""
End Sub
this what i tried i googled almost so please help me.
1. when name or number of person is give in column A, When macro runs it should go website and search that number/name by searching on webpage and extract data to column b.
2.i 60000 names and number of people need to validate those id/contact person are same? so please help to make my work easy.
3. my final aim is when i paste a bulk id's or name in column a and run macro it should search 1 by 1 in web page and extract that result from web page and paste it in column b.
all your help most appreciated thanks in advance.
