Hi Curt,

I attached your code to a cmd button (Right click the button and view code)
on a uaerform and created a workbook module call Sub AAAA() and it worked
perfectly for me.

Mike

"Curt" wrote:

will someone tell me why this does't call the macro. This is in the code for
a user form. It is acessed by an option button. Do I need to put the macro
procedure into the code of the option button?
Thanks

Private Sub OptionButton30_Click()
'Announcer Cards
Call AAAA
Worksheets("Data").Range("A4:A100,D4:D100,E4:E100, G4:G100,L4:L100").Copy
Worksheets("Announcer").Range("A2").PasteSpecial Paste:=xlValues
Application.CutCopyMode = False
'Destination:=Worksheets("Announcer").Range("A2")
End Sub