Açılışta textboxların boş olması

[kemal turan]

merhaba,
URUNGIRIS adlı userform da 111 adet textbox var.
kayıt işi bittiğinde URUNGIRIS.Hide kodu ile userform kapatıyorum.
tekrar açtığımda textboxlarda kapattığım veriler geliyor.
aşağıdaki kod ile textboxları boşaltmaya çalışıyorum olmuyor.
Not:userformu kendi çıkış X ile ikinci kez kapattığımda boşaltıyor.

Private Sub UserForm_Activate()
Dim nesne As Control
    
    For Each nesne In Me.Controls
        If Left(nesne.Name, 7) = "TextBox" Then
            Controls(nesne.Name) = ""
        End If
    Next nesne
End Sub

 

[vardar07]

URUNGIRIS.Unload Me olarak denedinizmi.

 

[kemal turan]

Merhaba Sn Vardar,
Çok teşekkür ederim.
URUNGIRIS.UN.. Hata verdi
Sadece unload me yeterli oldu.
Bu kapatma kodunu biliyordum alt userformuda kapatır diye kullanmadım.

 

[vardar07]

Birde bunu deneyin.

Unload URUNGIRIS