Unload UserForm in ActiveCell

[noexcelguru]

I have a UserForm with a TextBox wich content i would like unload in ActiveCell

I've pretty much tried every combination of Unload Me and ActiveCell, but with no luck.

Any ideas for a good code?

And one more;
With just this code, where does the content of the UserForm go?

Private Sub CommandButton1_Click()
Unload Me
End Sub

 

[VoG]

Try like this

Private Sub CommandButton1_Click()
ActiveCell.Value = Me.TextBox1.Text
Unload Me
End Sub

 

[noexcelguru]

Thanks, VoG, for both the speedy reply and the code good as gold