I'm not sure what 'second question' you refer to:

--- neville wrote:
> ... Your second question also came at a good time as I had the
same problem yesterday. Managed to solve it.
>
> TextBox1.Text = sheets(4).Range("Cell_Name").Cells(1, 1).Value


If you mean this line:

> > How I assign  a value from a sheet  named cell:
> > UserForm.TextBoxName = Sheet4.Range("Cell_Name")


It was an example of how I assign the value, not a question.