Copying Drop Down Lists

[Guest]

I am trying to copy data from one worksheet into an updated worksheet.
One of the pages contains cells with drop down box selections.
I'm trying to copy the data with the macro below but it's getting hung up on
the ActiveSheet.Shapes("Drop Down 50").Select Selection.Copy line.
Can anyone help?

Windows("BFP_OPXBUDGET_V452_15NOV05.xls").Activate
Range("B30:B37").Select
ActiveSheet.Shapes("Drop Down 50").Select
Selection.Copy
Windows("BFP_OPXBUDGET_V454_20NOV05.xls").Activate
Range("B30").Select
ActiveSheet.Paste

 

[Tom Ogilvy]

Assuming hung up means that you get an error. If the error is subscript out
of range, then you don't have a shape with the name "Drop Down 50"

 

[Guest]

I used the Record Macro function to get the code. When I copy and paste
manually it works. Anything else you can offer?

 

[Guest]

Someone had made the range of data into a "list" that could be sorted. I
removed this and it works normally. Thanks!