Wednesday, March 18, 2009

Get the data from clipboard

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

No comments:

Post a Comment