clearing the clipboard

**Stefi2000** · 10-26-2012, 05:14 PM

Hi All,

I found this method in this forum but it doesn't work for me. What have I missed? What should I do to make it work?

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 AAA()
OpenClipboard 0&
EmptyClipboard
CloseClipboard
End Sub

Regards,
Stefi

**Bishonen** · 10-26-2012, 05:22 PM

please use this instead

Sub test()

Application.CutCopyMode = False

End Sub

**Stefi2000** · 10-26-2012, 05:55 PM

Thank you for your answer, I saw this solution in many forums and many threads, but it doesn't work for me as well. It simply stops displaying "marching ants" around the range being copied. I don't understand why so many people think it clears the clipboard. Maybe I miss somthing?

Regards,
Stefi

**HSV** · 10-26-2012, 07:13 PM

Why would you clear the clipboard?
Are you getting a message?
To overcome a message:

application.displayalerts=false

**Stefi2000** · 10-26-2012, 07:52 PM

Well, I'm copying text and charts from Excel into Word with Copy/Paste in an Excel macro, it worked well several times, and at the next item (nothing different) I got an error message saying Paste cannot be done because there is nothing in the clipboard. I can't imagine why Copy didn't filled up the clipboard, I just thought it is overloaded, maybe clearing it helps.
Do you have any idea?
Thanks,
Stefi