Sonsuz döngüye girip belge kilitleniyor

[sedatuysal]

Eklediğim belgedeki "Bütçeleşecek mi?" kısmındaki Cmboboxtaki "Evet" seçeneğini seçtiğim zaman sonsuz döngüye girip belge kilitleniyor. Aynı boş bir excel belgesi açıp orda düzenlediğim zaman düzgün çalışıyor, kilitlemede yapmıyor. Comboboxun altındaki kodlar ise aşağıdaki gibidir. Yardımcı olursanız sevinirim. iyi günler...
Private Sub ComboBox1_Click()
If ComboBox1.Value = "Evet" Then
hesapadi2_cb.Enabled = False
Range("a26") = "323"
Range("b26") = "Bütçeleştirilmiş Borçlar Hesabı"
Range("a27") = 831
Else
If ComboBox1.Value = "Hayır" Then
hesapadi2_cb.Enabled = True
End If
Exit Sub
End If
End Sub

 

[Korhan Ayhan]

Selamlar,

Çalışmanızın kod kısmına şifre koymuşsunuz. Bu durumda size nasıl yardımcı olabiliriz.

 

[sedatuysal]

kusura bakmayın sayfa koruma ve vba koruma parolası: su tekrar teşekkürler...