Define Range Dynamically

[Randy]

I know this one should be easy, but I can't make it work. I'm trying
to dynamically define a range and assign it to a combobox on a user
form as the rowsource. Here is my code:

dim rngGrpList as Range
Set rngGrpList = Sheet1.Range("Groups",
Sheet1.Range("Groups").Offset.End(xlDown))
frmManageGroups.cboGroups.RowSource = rngGrpList

I'm getting a type mismatch error. It seems that my second line is
capturing the contents of the cells rather than their addresses. I've
played around with different ideas, but nothing seems to work. Can
anybody see why this won't work as intended?

Thanks,
Randy

 

[Tim Zych]

Does this help?

Sheet1.Range(Sheet1.Range("Groups")(1, 1), _
Sheet1.Range("Groups")(1, 1).End(xlDown)).Name = "Groups"
frmManageGroups.cboGroups.RowSource = "Groups"

 

[Randy]

Sorry, it doesn't work. It doesn't like the comman in the middle of
the statement. I played with it, but couldn't make it work.

Any ideas?
Thanks.
Randy

 

[Tim Zych]

Did you copy/paste it in as posted? The line continuation character must
follow the comma. Otherwise, I'm out of steam for suggestions. It works for
me.

 

[Gary Keramidas]

didn't test anything, but try .address after the line that errors out.

 

[Randy]

My bad. i didn't have the range name in quotes. Thanks. It works
perfectly.

Randy