Thanks Bob and Ardus

It working well now.

Greg
"Greg" wrote in message
...
Hi all, what am I doing wrong with the vb code below.
I am trying to get the rowsource from a sheet called "mainsheet"
and the range f22 to f23


If Sheet1.Range("F18").Value = 8 Then
MsgBox "8"
ComboBox1.RowSource = Sheet1.Range("F22:F31")

ComboBox1.Visible = True

End If

Thanks