Macro won't run

[jopakent]

I've got a macro that I was using fine a while ago. I had to disable all macro activity for distribution, but now I want to use it again.

There is a line in the macro that says:

'Requires a Reference to the Microsoft Forms 2.0 Object Library
If ActiveWindow.Selection.Type <> ppSelectionText Then
MsgBox "Click in the textbox where you want to paste, then try again."
Exit Sub
End If

I thought that what I did to satisfy this requirement was to just insert a blank userform. I tried that and also tried inserting a blank Module and a blank Class Module, but I still get teh error message:
Compile error: User-defined type not defined.

Can't figure out what I'm missing here. Any suggestions?

[HansV]

The code that you posted doesn't require a reference to the Microsoft Forms 2.0 Object Library, it is 100% PowerPoint VBA.

Could you post more of the code, or attach a copy of the presentation (zipped; you can remove all slides except the first one, and remove all text from that slide)

[jopakent]

The code that you posted doesn't require a reference to the Microsoft Forms 2.0 Object Library, it is 100% PowerPoint VBA.

Could you post more of the code, or attach a copy of the presentation (zipped; you can remove all slides except the first one, and remove all text from that slide)

[attachment=86557:Broken Macro.zip]

Here's a sample document with the inop macro in it.

[StuartR]

[attachment=86557:Broken Macro.zip]

Here's a sample document with the inop macro in it.

I get the same error as you, and inserting an unused userform was sufficient to correct the error.

[HansV]

The line that caused the error message was just below the code that you posted:

Dim clip As New MSForms.DataObject

If I insert a userform, then delete it, the required reference has been set. The code then works correctly. See the attached version (I removed the background pictures to reduce the file size by a factor 50).

[attachment=86559:Broken Macro.zip]

[jopakent]

The line that caused the error message was just below the code that you posted:

Dim clip As New MSForms.DataObject

If I insert a userform, then delete it, the required reference has been set. The code then works correctly. See the attached version (I removed the background pictures to reduce the file size by a factor 50).

[attachment=86559:Broken Macro.zip]

Thanks, not sure why it didn't work for me. It does in the attachment you sent. I found an old file that still had a userform in it and am using that successfully now.

Thanks again for your assistance.