hi have vba code take screenshot in website, , paste in ms paint copy again paste in ms access database. right im trying paste screenshot on ms paint not working.
here's part of code i'll screenshot open mspaint paste:
keybd_event vk_menu, 0, 0, 0 keybd_event vk_snapshot, 0, 0, 0 keybd_event vk_snapshot, 0, keyeventf_keyup, 0 keybd_event vk_menu, 0, keyeventf_keyup, 0 'open mspaint shell "c:\windows\system32\mspaint.exe", 1 application.sendkeys "^v"
digging little more, should work
'your code screenshot dim wshshell object set wshshell = createobject("wscript.shell") wshshell.run "mspaint" application.wait + timevalue("00:00:01") wshshell.appactivate "paint" application.wait + timevalue("00:00:01") wshshell.sendkeys "^(v)" application.wait + timevalue("00:00:01")