Userform'dan başka bir Userform açılışında hata

[cocoa35]

Arkadaşlar merhaba; bir userform üstünde bulunan commandbar ile başka bir userform'u çağırdığımda ek'teki hata sinyalini veriyor sonra tekrar tık'ladığımda userform açılıyor! açılacak userform içindeki kod'lar değişmedi bu hata sinyalini yeni vermeye başladı sorun nedir acaba?

 

[cocoa35]

Açılacak olan userform içindeki kod'lar ve userform görüntüsü ek'tedir

Private Sub CommandButton1_Click()

On Error GoTo Hata

Workbooks.Open Filename:=TextBox1.Text & "ornek.xlsm"

Sheets("anasayfa").Select

Unload Me

Exit Sub

Hata:

MsgBox "Dosya bulunamadı!", vbCritical

End Sub



Private Sub UserForm_Initialize()

' TextBox1.Text = Replace(ThisWorkbook.FullName, ThisWorkbook.Name, "")

TextBox1.Text = ThisWorkbook.Path & "\"

End Sub

 

[ÖmerBey]

Merhaba,
Her iki userformun showmodal özelliğini false yapıp deneyiniz.
İlk form showmodal=true olarak açılırsa ikincisi showmodal=false olarak açılmaz...

 

[cocoa35]

Ömer bey dediğiniz gibi showmodal=false yapıp denedim şu anda sorun gözükmüyor açılıyor userform çok teşekkürler ilginiz için.

 

[ÖmerBey]

Rica ederim,
İyi çalışmalar...