Excel VBA Subroutine, Fix my Code: TAB and Copy and Paste from a software that is being run Remotely
1.the code will go to another software that is being run remotely 2. Navigate through software using the tab option (shift tab 20 times) 3. hightlight (ctrl shift right) and then copy 4. finds the copied info in excel column B and returns the row number 5. tabs 20 times and returns to orginal place 6. pressed down arrow to move to next data I have tested these steps using the keypad and they work successfully,but when I try to simulate them, I can not tab and copy via script Use VBA found in Excel Sub find_sr() Dim WshShell Set WshShell = CreateObject("WScript.Shell") 'software that I want to connect to, this line executed correctly WshShell.AppActivate "\\Remote" Sleep 1000 'for loop x For x = 1 To 100 'shift tab, hit shift tab 20 times(20x) this will move to the location of interst For i = 1 To 20 'the following lines are not working, software is not responding to remote tab commands WshShell.SendKeys "+{TAB}" Sleep 500 Next i 'ctrl shift right, this hightlights and copies WshShell.SendKeys "^+{RIGHT}" Sleep 500 'copy ctrl c WshShell.SendKeys "^c" Sleep 500 'copy to excel cell(x) 'PLACE DATA IN CELL(1,1) then increment rows by x 'search the copied value in column B 'tab (20x), this take you back to the orginal place you were before WshShell.SendKeys "{tab}" Sleep 500 'down arrow WshShell.SendKeys "{down}" Sleep 500 'loop Next x End Sub
| Expired |
Related projects
Search for freelance jobs
"I did not know what to expect at first. But my final impression once I used your site and service is a great one! Simply amazing!
I would recommend this service to any other freelance artists and co workers who are looking to expand their client base."
"The possibility to include all information about my freelance working places in just one website. It means, I don't need to tell my future employer to go to odesk, elance, etc. They can check everything about me in donanza website."