If you have your combo box in your Activesheet..

Dim rw As Long: rw = 51
'To assign the value from cell to combo
ActiveSheet.REFI51 = Range("AG" & rw)

'To assign the value from combo to cell
Range("AG" & rw) = ActiveSheet.REFI51



--
If this post helps click Yes
---------------
Jacob Skaria


"Brett" wrote:

I have a series of comboboxes in a sheet (REFI1, REFI23 etc). How can I make
the second line of code generic (i.e pass the value of rw into Me.REFI & rw)?
Dim rw As Long: rw = 51
Range("AG" & rw) = Me.REFI51

I tried:
Range("AG" & rw) = Me.REFI & rw
but it debugs with "REFI" data member not found.
Thanks in advance, Brett.