Copy to Clipboard not working

Okay, I've got an annoyance going on. Last week I noticed on macro I had, that copies items to the clipboard, when I pasted the result, it was only question marks. I shrugged that off and kept going, then promptly forgot.

This morning it happened again with a different macro, so I seem to have the same issue with multiple macros.

I've posted one example that is now putting question marks on my clipboard. Note that this macro is NOT THE PROBLEM, it's an EXAMPLE of the problem.

My PC was recently reimaged, but I saved all my configurations and restored them, so almost everything so far seems to be working right, with this exception. The macro below requires MS Forms 2.0 object library, which IS referenced. The code exists in an add-in along with a lot of other stuff I use frequently, and everything else in the add-in seems to be working right, unless it copies to the clipboard.

Any help would be greatly appreciated.

Please Login or Register  to view this content.

Kenneth,
I found out there's a Microsoft bug that's causing this. See this article: https://www.thespreadsheetguru.com/b...-the-clipboard
I found one workaround; if I close all my Explorer windows, the code works fine. My next step will be to figure out hot to plumb the code at the link above into my various macros that copy to the clipboard.

You should use the API calls to put text on the clipboard - it's a lot safer these days. You can put that code into a generic routine and just call it wherever you need it.

Kenneth,
I'm so sorry I left you hanging! I got pulled away, and promptly forgot this post, and then got fed up today because I keep having to close Explorer to use my macros. Grrr!

Anyway, I'm looking at your code, and trying to understand it before I attempt to use it. You're using a convention I'm not familiar with, the # sign in front of your "If" statements.

In the "MSForms" module, I fooled around a bit with the "Test_PutGetClipboard", trying to put my selection on the clipboard, rather than a hardcoded range. But "Selection.PutInClipboard" gives me an "Object doesn't support this property or method" error. "PutInClipboard (Selection.Value)" works, but only if I select just one cell. I have multiple macros that act on my selection, for instance "Copy Sum", which adds up my selection and puts the total on my clipboard, and another which copies everything I've selected to the clipboard and allows me to add a comma, dash, etc, between each character. There are others. For all of these, my current workaround is to close Explorer. Your PutinClipboard function appears to work, but how do we adapt it to a multi-range selection?

Ignore my last post, still trying to understand.

Am I wrong, or is your "PutInClipboard" function operating without having the API calls?

Also, what is the difference between API, API2, and API3?

Finally, if I have to use the API, do I put it at the top of each module that contains a macro that calls to the clipboard?

figure it might help is I share some of the macros I'm having trouble with. There are others, but if I can solve these two I can solve all the rest. The macros work great when Explorer is closed.

Please Login or Register  to view this content.

Please Login or Register  to view this content.