vba syntax to paste clipboard content

Hi VINOTHBASKRAN,

The following code should help you:

Option Explicit

'In the debugger:
'Tools -> References -> Microsoft Forms 2.0 Object Library (Excel 2003 version)
'or you will get a "Compile error: user-defined type not defined"

Sub PutSomethingInClipboard()
  Dim mydataobj As New MSForms.DataObject
  mydataobj.SetText 123
  mydataobj.PutInClipboard
End Sub

Sub RetrieveClipboardData()
  Dim DataObj As New MSForms.DataObject
  Dim S As String
  DataObj.GetFromClipboard
  S = DataObj.GetText
  Debug.Print S 'print code in the debugger immediate window (CTRL - G)
End Sub

Sub ClearClipboardData()
  'NOTE:  'DataObj.Clear' does not always work
  Dim DataObj As New MSForms.DataObject
  DataObj.SetText ""
  DataObj.PutInClipboard
End Sub

Lewis