I'm trying to clear the Excel clipboard with VBA. I've tried this

Application.CutCopyMode = False

And it doesn't clear it. What am I doing wrong?

Thanks,
Barb Reinhardt

Public Sub ClearClipboard()
Dim MyDataObj As New DataObject
MyDataObj.SetText ""
MyDataObj.PutInClipboard
End Sub


From:

http://www.cpearson.com/excel/clipboard.htm
--
Gary''s Student - gsnu200791


"Barb Reinhardt" wrote:

> I'm trying to clear the Excel clipboard with VBA. I've tried this
>
> Application.CutCopyMode = False
>
> And it doesn't clear it. What am I doing wrong?
>
> Thanks,
> Barb Reinhardt
>

Declare Function CloseClipboard Lib "user32" () As Long
Declare Function EmptyClipboard Lib "user32" () As Long
Declare Function OpenClipboard Lib "user32" (ByVal hwnd As Long) As Long

Sub ClearClipboard()
OpenClipboard 0&
EmptyClipboard
CloseClipboard
End Sub