Thread: Web
View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
fi.or.jp.de fi.or.jp.de is offline
external usenet poster
 
Posts: 93
Default Web

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