We can get last copied data (text) with following code.
Set objInternetExplorer = CreateObject("InternetExplorer.Application")
objInternetExplorer.Navigate("about:blank")
msgbox objInternetExplorer.document.parentwindow.clipboardData.GetData("text")
OR
Set objClipboard= CreateObject("Mercury.Clipboard")
objClipboard.Clear
objClipboard.SetText "use variable for the Copied text"
MsgBox objClipboard.GetText
Wednesday, March 18, 2009
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment