I copied the code you gave me but it appears an error:
"Compile error: Sub or function not defined"
I send you a copy of all the code of the form, maybe it help... I thought it was easyer, sorry again for my insistance...
Private Sub Command30_Click()
On Error GoTo Err_Command30_Click...