Очистка формы

[Радмир4855]

Как сделать чтобы форма чистилась после каждого использования?
После поиска выхожу, обратно захожу, критерии поиска остаються, как сделать чтобы они после каждого использование чистились

Код:
Private Sub CommandButton2_Click()
UserForm4.Hide
UserForm1.Show
End Sub

Private Sub CommandButton3_Click()
Selection.AutoFilter
End Sub
Private Sub UserForm_Initialize()
ComboBox1.List = Array("Код операции", "Код товара", "Тип операции")
End Sub
Private Sub CommandButton1_Click()
If ComboBox1.Value = ("Код операции") Then
Range("A1:A51").Select
End If
If ComboBox1.Value = ("Код товара") Then
Range("B1:B51").Select
End If
If ComboBox1.Value = ("Тип операции") Then
Range("C1:C51").Select
End If
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:=TextBox1.Text
End Sub

[EducatedFool]

Замените UserForm4.Hide на Unload UserForm4

[Радмир4855]

Спасибо большое!!!!