Web
Sorry ron, i got it.
I didn't tested the second code you have given, just now tested works
fine.
I used like this, thank you very much ron....
Set Shtn = Sheets("sheet2")
Set doc_tables = ie.Document.getElementsByTagName("table")
For i = 1 To 15
For j = 1 To 3
ACell = doc_tables(1).Rows(i).Cells(j).innerText
Shtn.Cells(i, j) = ACell
Next j
Next i
one more, How do i check how many rows are available in a table ?
And "View" button still disabled i don't know why ? even after check
box checked.
On Oct 8, 9:48*pm, "fi.or.jp.de" wrote:
Ron, absolutely fine.
I am able get the table data into excel sheet.
I have tested for single row, which contains 3 tabs.
all the tabs data came in a single cell. how can i make it to
different columns.
Joel,
I didn't find href property
source code
* * * * * * <li class="pageButtons" id="summary_view_list"
* * * * * * * * <input class="buttonDefaultDisabled" type="button"
id="summary_view_button" name="html_but_view" disabled="disabled"
value=" View " title="View" onclick="submitNewAction
(document.html_form_list,'InstitutionAccount');"/
* * * * * * </li
On Oct 8, 8:12*pm, ron wrote:
On Oct 8, 8:47*am, "fi.or.jp.de" wrote:
Hi All,
I have table in web page with check box for each row.
And there is one option called "view", it is been disabled.
When i manually click the check boxes "view" button enables but when i
do
it on Excel Vba its not enabled.
check box code ..
For Each itm In ie.Document.getElementsByName("html_ckb_list")
* * itm.Checked = True
Next itm
How Can i enable "view" button ?
And also i need to copy the table to excel sheet ?
How can i achieve this.
I need to login web page and need to go for some other tabs to grab
this info.
So, I didn't mentioned the web address.
I know without web address it is difficult but any small clues will
help me more. i will try
for the rest, just give me hints to enable button and copy table
contents.
Thanks in advance.
There are a couple of ways to check a check box, maybe one of the
other ways will better simulate manually clicking the box. *Check the
source code for the name of the check box you want to select and then
try
* ie.document.all.Item("chk_box_name").Click
or
* check_bx = ie.document.all.Item("chk_box_name").Checked
As for copying the table try the following
* * Set doc_tables = ie.document.getElementsByTagname("table")
* * ActiveCell = doc_tables(0).innertext
If there is more than one table you'll have to find the correct
(number) for the table you want. *Also, if you just want part of the
table try the following constructions
To capture a row
* *ActiveCell = doc_tables(0).Rows(5).innertext
To capture part of a row
* *ActiveCell = doc_tables(0).Rows(5).Cells(5).innertext
Hope this helps...Ron
|