This should be easy.
I want to select a cell. then copy the comment from a cell into the
clipboard.

To get the comment I can
Excel.Selection.Comment.Text


for copying to the clipboard. Googline I see a clipboard object. people
use:
Clipboard.setText

but clipboard is not an object for me.
Do you have to add a reference in?
dim it as something?

thanks

If you don't already have a userform, add one and then you can delete it
(just a quick way to add the necessary Reference for DataObject).

Sub ComToClipBrd()
Dim sComText As String
Dim dtaObj As DataObject

On Error Resume Next
sComText = ActiveCell.Comment.Text
On Error GoTo 0

If Len(sComText) Then
Set dtaObj = New DataObject
dtaObj.SetText sComText
dtaObj.PutInClipboard

MsgBox sComText, , "put in clipboard"
End If

End Sub

Regards,
Peter T

"greg" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
> This should be easy.
> I want to select a cell. then copy the comment from a cell into the
> clipboard.
>
> To get the comment I can
> Excel.Selection.Comment.Text
>
>
> for copying to the clipboard. Googline I see a clipboard object. people
> use:
> Clipboard.setText
>
> but clipboard is not an object for me.
> Do you have to add a reference in?
> dim it as something?
>
> thanks
>

thanks
works great

"Peter T" <peter_t@discussions> wrote in message
news:(E-Mail Removed)...
> If you don't already have a userform, add one and then you can delete it
> (just a quick way to add the necessary Reference for DataObject).
>
> Sub ComToClipBrd()
> Dim sComText As String
> Dim dtaObj As DataObject
>
> On Error Resume Next
> sComText = ActiveCell.Comment.Text
> On Error GoTo 0
>
> If Len(sComText) Then
> Set dtaObj = New DataObject
> dtaObj.SetText sComText
> dtaObj.PutInClipboard
>
> MsgBox sComText, , "put in clipboard"
> End If
>
> End Sub
>
> Regards,
> Peter T
>
> "greg" <(E-Mail Removed)> wrote in message
> news:(E-Mail Removed)...
>> This should be easy.
>> I want to select a cell. then copy the comment from a cell into the
>> clipboard.
>>
>> To get the comment I can
>> Excel.Selection.Comment.Text
>>
>>
>> for copying to the clipboard. Googline I see a clipboard object. people
>> use:
>> Clipboard.setText
>>
>> but clipboard is not an object for me.
>> Do you have to add a reference in?
>> dim it as something?
>>
>> thanks
>>
>
>