Text box in a userform to equal a cell

[s_smith_iet]

I need a userform text box to equal B5 on sheet Cycle data in the same
spread sheet.

Cannot figure this out

Please help

 

[Office_Novice]

Private Sub UserForm_Initialize()
Me.TextBox1.Value = Range("B5").Value
End Sub

 

[Rick Rothstein \(MVP - VB\)]

You forgot the worksheet (which I think is named "Cycle data")...

Private Sub UserForm_Initialize()
Me.TextBox1.Value = Worksheets("Cycle data").Range("B5").Value
End Sub

Rick