Prova con :

nome = UserForm1.TextBox1.Text

al posto di :

nome = UserForm1.TextBox1.Value