deepakharekrishna
New Member
- Joined
- Feb 3, 2015
- Messages
- 2
IFSC code | IFSC codes | find IFSC code | List of IFSC codes | NEFT IFSC | RTGS IFSC | IMPS IFSC
i want to get ifsc code details as per reqirment.
Dim wn As String
Dim ie1 As InternetExplorer 'include Microsoft internet control and html library
tm = Time
wn = ActiveWorkbook.Name
Set ie1 = New InternetExplorer
Set ie2 = Nothing
With ie1
.navigate "http://www.ifsccodebank.com/"
.Visible = False
End With
Do While ie1.Busy: Loop
Do While ie1.readyState <> 4: DoEvents: Loop
With ie1
.document.all.Item("ctl00$BC$ddlBank").Value = "68"
.Visible = True
End With
Do While ie1.Busy: Loop
Do While ie1.readyState <> 4: DoEvents: Loop
this code working up to 1st level but not changed the form as per selection.
i want to get ifsc code details as per reqirment.
Dim wn As String
Dim ie1 As InternetExplorer 'include Microsoft internet control and html library
tm = Time
wn = ActiveWorkbook.Name
Set ie1 = New InternetExplorer
Set ie2 = Nothing
With ie1
.navigate "http://www.ifsccodebank.com/"
.Visible = False
End With
Do While ie1.Busy: Loop
Do While ie1.readyState <> 4: DoEvents: Loop
With ie1
.document.all.Item("ctl00$BC$ddlBank").Value = "68"
.Visible = True
End With
Do While ie1.Busy: Loop
Do While ie1.readyState <> 4: DoEvents: Loop
this code working up to 1st level but not changed the form as per selection.
