Populate ComboBox

Can someone tell me why the code below won't work to populate a ComboBox that I have on a userform named "TradingDashboard"?

TradingDashboard.ComboBox2.List = Range(Cells(ActiveCell.Row, "F"), Cells(ActiveCell.Row, "G"))

Even better, let me in how it should be written?

If it's not clear from my attempt, the ComboBox should contain two choices in the list. The row from the active cell of column F and the same again for column G.

My ComboBox is on a userform named "TradingDashboard" not a worksheet.

I therefore your code to

With TradingDashboard
 ComboBox2.List = Application.Transpose(.Cells(ActiveCell.Row, "F").Resize(, 2))
End With

but when I try to run the code it comes up with a compile error "Method or Data Member not found" and highlights the code

.Cells

ok. I might seem really thick now but the sheet name of the active cells is called "Coupon". What do I amend?

Try this.

With ActiveCell.Parent
   Me.ComboBox2.List = Application.Transpose(.Cells(ActiveCell.Row, "F").Resize(,2))
End With

Harry

I suppose With Sheets("") is redundant too, it's not needed as without a worksheet reference Cells and Range will refer to the active sheet.