Passing Named Range as parameter to Sub()

HI,

I am trying to pass a parameter, a named range on another sheet, to a secondary Sub(). The named range is Slist and it is on a sheet called Setup. In my main Sub() I define

Dim MenuList As Range
Set MenuList = ThisWorkbook.Sheets("Setup").Range("SList")

and call the secondary Sub() as

Call Add_Drop_Down_Menu_Cell(MenuList)

My secondary Sub() is

Please Login or Register  to view this content.

I am getting application-defined or object defined error 1004. It appears that the Sub cannot locate or access my MenuList. Is there a way I can check that a correct menu list is being passed tot he Sub? Also, any ideas how to fix this? Thank you.

Just guessing (you don't say where the error occurs), but you may want

Please Login or Register  to view this content.

or

Please Login or Register  to view this content.

However, the validation range must refer to a range on the worksheet where the validation appears, or to a named range scoped to the sheet with validation that refers to a range on another worksheet.

perhaps

Please Login or Register  to view this content.

Hello Zeos6

You can easily obtain the formula style range reference from the Named Range by using the Name property. If the range passed is not a Named Range, VBA will throw an error.

Please Login or Register  to view this content.