Perhaps

cbxGrade.RowSource = Range("Grades").Address(0,0,xlA1,True)

if Grades isn't on the activesheet

--
Regards,
Tom Ogilvy


"Toppers" wrote in message
...
Interesting! I have XL2003 and both worked for me but thanks for
increasing
my knowledge anyway.

"Michael Beckinsale" wrote:

Toppers,

That code didn't work but many thanks as you pointed me in the right
direction! Its not usually that simple!

Everything appears to work OK using the following code:

cbxGrade.RowSource = "Grades"

Maybe it is to do with the version of Excel being used. I am on Excel
2003
Professional / WindowsXP

"Toppers" wrote in message
...
Hi,

cbxGrade.RowSource = Range("Grades").Address

"Michael Beckinsale" wrote:

Hi All,

Is it possible to use a named range as the RowSouce property of a
ComboBox
in VBA ?

If so what is the code?

I think it should be something along the lines:

Private Sub UserForm_Initialize()
With frmHR
cbxGrade.RowSource = "ActiveWorkbook.Names Name:="Grades""
End With
End Sub

I need to use named ranges as the source list is dynamic and l dont
want
blanks and therefore cannot use the whole column as a RowSource
reference.

All help gratefully received

Regards

Michael beckinsale