Hi,

I usually use userforms to view/create database in excel. The problem is when the number of column is high, I have to enter and link all variables of the userform to excel cells. I am sure there is a way to write the code in one line. My code look like this

Private Sub Userform_Initialize()



Set rgdata = ActiveCell.EntireRow

gotorgdata = rgdata.Value

DealField1.Value = gotorgdata(1, 1)
DealField2.Value = gotorgdata(1, 2)
DealField3.Value = gotorgdata(1, 3)
DealField4.Value = gotorgdata(1, 4)
DealField5.Value = gotorgdata(1, 5)
DealField6.Value = gotorgdata(1, 6)
DealField7.Value = gotorgdata(1, 7)
DealField8.Value = gotorgdata(1, 8)
DealField9.Value = gotorgdata(1, 9)
DealField10.Value = gotorgdata(1, 10)
DealField11.Value = gotorgdata(1, 11)
DealField12.Value = gotorgdata(1, 12)
DealField13.Value = gotorgdata(1, 13)
DealField14.Value = gotorgdata(1, 14)
DealField15.Value = gotorgdata(1, 15)
DealField16.Value = gotorgdata(1, 16)
DealField17.Value = gotorgdata(1, 17)
DealField18.Value = gotorgdata(1, 18)
DealField19.Value = gotorgdata(1, 19)
DealField20.Value = gotorgdata(1, 20)

End sub

Also if there is a way to create names for all the text boxes of the userform it will be easier.

Can you help me out?

Thank you very much

Joe