Asign a value to a text box
Dim OrderNumber as Range
Set OrderNumber = ActiveSheet.[A1]
Me.MyTextbox = OrderNumber 'define a range inside VBA code
' or
Me.MyTextbox = ActiveSheet.[A1] ' use absolute cell addressing
' or
Me.MyTextbox = Range("MyWSRange").Cells(1,1) 'use a range defined in worksheet
With a ComboBox basically you can do the same. If you want to include the displayed value into the ComboBox DownDown list as well, you need to add it as an item
Me.ComboBox1.AddItem ActiveSheet.[A1]