DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [D1]) Is Nothing Then Exit Sub
If [D1] = "" Then Exit Sub
'Call Makronuzun Adını buraya yazın
End Sub
ÖmerFaruk bey , liste uzunca olacak pratik olması açısından açılır liste yerine normal listeden oluşturulma imkanı varmıdır ?Sayfa üzerine veri doğrulama ile açılır liste oluşturup makronuzu çalıştırabilirsiniz.
Listeniz mesela D1 hücresinde olsun
C++:Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, [D1]) Is Nothing Then Exit Sub If [D1] = "" Then Exit Sub 'Call Makronuzun Adını buraya yazın End Sub
selam arkadaşlar
görselde liste kutusundan 3=>30 >=70 vb gibi seçenekleri seçip kutucukta tanımlı olan makroyu çalıştırıyorum
direk liste kutusundan tercih sayısını yaptıgımızda makroyu çalıştırabiliyormuyuz ?
evet Ömer bey , işimi görür teşekkür ederim.