line49:
Case Is = 50
Range("B53") = Me.TextBox2
If TextBox3.Text = "" Then GoTo line50
Range("C53") = Me.TextBox3

line50:
Case Else
errorline:
MsgBox "Ikke gyldige parameter!"

lastline:
End Select

Well. the code works fine. I tryed all 50 cases with and without text in
textbox3. if I take away the: "If TextBox3.Text = "" Then GoTo line50".
the code will set for eksample: Range("C53") = Me.TextBox3. that means
it will be executed even if user dont write anything in textbox3.
But I want the existing text to stay in the cell if the user dont write
anything in textbox3

I am a low level hobby programmer, so please be patient to my answer. I
can't explain why it work.

Thanks

Aksel

*** Sent via Developersdex http://www.developersdex.com ***