Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]() I am getting an error message error: object required: 'clipboard' code: 800a01a8 i am trying to paste the clipboard as key stokes, and not just pasting data. this is my first script, and i learned this yesterday, so please be nice as i am a very newbie!!! Set WshShell = WScript.CreateObject("WScript.Shell") For a = 1 To 1 WshShell.AppActivate "MICROSOFT EXCEL" WScript.Sleep 300 WshShell.SendKeys "{F2}" WScript.Sleep 300 WshShell.SendKeys "{END}" WScript.Sleep 300 WshShell.SendKeys "+{Home}" WScript.Sleep 300 WshShell.SendKeys "^(c)" WScript.Sleep 400 WshShell.AppActivate "MICRO KEY" WScript.Sleep 1000 WshShell.SendKeys "{F2}" WScript.Sleep 2000 WshShell.SendKeys "^(v)" WScript.Sleep 4000 WshShell.SendKeys "~" WScript.Sleep 1000 WshShell.SendKeys "%(Q)" WScript.Sleep 300 WshShell.SendKeys "(R)" WScript.Sleep 300 WshShell.SendKeys "(U)" WScript.Sleep 4000 WshShell.SendKeys "^{INSERT}" WScript.Sleep 300 WshShell.SendKeys "+{TAB}" WScript.Sleep 300 WshShell.SendKeys "+{TAB}" WScript.Sleep 300 WshShell.SendKeys "+{TAB}" WScript.Sleep 1000 WshShell.AppActivate "MICROSOFT EXCEL" WScript.Sleep 1000 WshShell.SendKeys "{TAB}" WScript.Sleep 300 WshShell.SendKeys "{F2}" WScript.Sleep 300 WshShell.SendKeys "{END}" WScript.Sleep 300 WshShell.SendKeys "+{Home}" WScript.Sleep 300 WshShell.SendKeys "^(c)" WScript.Sleep 400 WshShell.AppActivate "MICRO KEY" WScript.Sleep 400 Clipboard.SetText WshShell.SendKeys.Send("^{v}") Next WScript.Quit thanks in return!!!!!!!!!!!!!!!! |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
copy and paste (visual basic) | New Users to Excel | |||
help to paste via visual basic | New Users to Excel | |||
visual basic (copy and paste) | Excel Worksheet Functions | |||
copy and paste (visual basic) | Excel Programming | |||
visual basic command to special paste a row of formulas into value | Excel Programming |