Pulling Data from a sheet into a userform

[tonywatsonhelp]

Hi Everyone

I have a userform called Userform1
and i want to pull data into it from

Sheets("Form Info").Range("A1")

I tried this but it didn't work any ideas how i do this and what i did wrong?

Thanks

Tony​

[FONT=Calibri][SIZE=3][COLOR=#000000]Sub AAA_Calender1_tests()[/COLOR][/SIZE][/FONT]
[FONT=Calibri][SIZE=3][COLOR=#000000]      UserForm1.Show[/COLOR][/SIZE][/FONT]
[FONT=Calibri][SIZE=3][COLOR=#000000]     UserForm1.TextBox1.Value = Sheets("Form Info").Range("A1").Value[/COLOR][/SIZE][/FONT]
[FONT=Calibri][SIZE=3][COLOR=#000000]End Sub[/COLOR][/SIZE][/FONT]

 

[KevCarter]

Tony,

Please try:

[COLOR=#000000][FONT=Calibri]UserForm1.TextBox1.Value = [/FONT][/COLOR]ThisWorkbook.Worksheets("[COLOR=#000000][FONT=Calibri]Form Info[/FONT][/COLOR]")[COLOR=#000000][FONT=Calibri].Range("A1").Value[/FONT][/COLOR]

 

[tonywatsonhelp]

Thank you Kev,
Turns out I just had the order the wrong way Should do Show after but thanks for your help
Tony

 

[KevCarter]

Tony,

I like to set my values in the initialize event of the user form. Just another option...

Sub AAA_Calender1_tests()
      UserForm1.Show
End Sub

Private Sub UserForm_initialize()
     Me.TextBox1.Value = ThisWorkbook.Worksheets("Form Info").Range("A1").Value
End sub