Using Active X buttons to copy data to clipboard

[cr130]

Hello All,

Today I am trying to attach a VBA Code to a Active X button that will copy a certain text line to the clipboard. I know how to copy a cell with an active x button but wanted to do it without referencing a cell.

 

[cr130]

In the macro I put a comment:

"'Example to paste on the active sheet"

It is just an example to paste what you put in memory.

To make it work, just delete this line:

ActiveSheet.Paste

Sub put_clipboard_2()
  Dim obj As Object
 
  Set obj = CreateObject("new:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}")
  obj.SetText "copy a certain text line to the clipboard"
  obj.PutInClipboard
End Sub

Yeah, i did try that but it didnt do anything. i didnt even get an error. i am sure its just user error. i am still learning all this stuff. i appreciate your help Dante.

 

[DanteAmor]

i did try that but it didnt do anything.

In the previous post you commented that it is pasting you on the page, it means that the text is in memory.

it just paste into the cell i am highlighted in excel

It means it is working, the text is on the clipboard, I don't understand what you mean by " it didnt do anything"