combo nun exitin de calısması gerekir

Katılım
25 Aralık 2007
Mesajlar
335
Excel Vers. ve Dili
exel 2000 türkçe
Private Sub ComboBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim c As Range
Dim IlkAdres As String
Dim sp As Worksheet
Dim Evet As String
Set sp = Sheets("firma")
Set c = sp.Range("b:b").Find(ComboBox2.Value, LookIn:=xlValues)
If c Is Nothing Then
UserForm6.Show
End If
End Sub
yukarıdaki kod
combobox 2 den cıkıldıgında calısması gerekirken
userformun kapanısında calısıyor
yardım edecek arkadaslara tesekkurler
 

Ekli dosyalar

Mehmet Şahin

Destek Ekibi
Destek Ekibi
Katılım
13 Ekim 2005
Mesajlar
1,401
Excel Vers. ve Dili
Excel 2010 - 2013 Türkçe - İngilizce
Merhabalar,
Combobox'ın içinden bulunduğu frame'den çıkarıp denermisiniz, iyi çalışmalar.
 
Üst