sheikhmisbah
New Member
- Joined
- Feb 15, 2011
- Messages
- 7
Hi All, |
I am looking a VBA code to export data from webside (JDE) & Paste/Export it into excel file. |
I need your help to create a macro to follow the following steps : |
1 - Go to Opened tab "www......... [ using Valadimir code GetIE_LateBinding() which is working perfectly] |
2 - Copy Cell A2 (sheet name : Sheet1). FYI - Column A is the list of Job Numbers |
3 - Paste the above copied cell value (eg A2) in Job Number Box [ HTML CODING |
input name="0_31"tabindex="2" title="Job Number" class="textfieldautosuggesttextfield" id="C0_31" |
4 - Click the search button to search the above Job Number [ HTML Coding |
img name="hc_Find" title="Find(Ctrl+Alt+I)" id="hc_Find" |
Wait few seconds to reterive all data. |
5 - Click button >| to go Last line [HTML Coding |
a title="Go to end"id="GOTOLAST0_1" style="text-decoration: none;" |
img name="jdehtmlGridDown"title="Go to end" id="jdehtmlGridDown" |
6 - Click export button to Export data. HTML Coding |
Script jdeWebGUIstartMenu(px"ToolsMenu"); |
jdeWebGUIaddMenuItem("ToolsMenu","Export Grid Data","javascript:toolsExitSelected('ExportData0010_1', '')","MENU","Export_To_Excel","Menu Item","",false,"","","false",""); |
7 - Click Continue button to save the above export data : |
a tabindex="-1" title="Continue(Ctrl+Alt+E)" style="text-decoration: none;"> |
img name="hc1" title="Continue(Ctrl+Alt+E)" id="hc1" |
8 - after save the above export data go to next cell (A3) |
9 - stop looping if Column A get blank (means end of job numbers) & show the msg Total Job numbers has been exported. |
Any idea for the above ? |
Your cooperation would be really really appreciated. |
Best Regards, |
Sheikh |
<colgroup><col> </colgroup><tbody>
</tbody>