Bu makro neden görev yapmıyor?

Tevfik_Kursun

Altın Üye
Katılım
30 Temmuz 2012
Mesajlar
3,820
Excel Vers. ve Dili
Office 2016 Pro - Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
12-02-2029
Günaydın Arkadaşlar,
Bu makroda ben nerede hata yapmışım?
Saygılarımla
 

Ekli dosyalar

DoğanD

Altın Üye
Katılım
22 Eylül 2023
Mesajlar
473
Excel Vers. ve Dili
Office 365 TR
Altın Üyelik Bitiş Tarihi
05-10-2028
Merhaba,

Çağırdığınız Uye Sub'ındaki kodları da paylaşabilir misiniz?
 

Tevfik_Kursun

Altın Üye
Katılım
30 Temmuz 2012
Mesajlar
3,820
Excel Vers. ve Dili
Office 2016 Pro - Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
12-02-2029
Basit bir makro o. Hata burada
 

Tevfik_Kursun

Altın Üye
Katılım
30 Temmuz 2012
Mesajlar
3,820
Excel Vers. ve Dili
Office 2016 Pro - Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
12-02-2029
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    If Intersect(Target, [L5:N5]) Is Nothing Then Exit Sub
    If [L5] <> "" And [N5] <> "" Then [N5] = ""
    Call Uye
End Sub
Bu şekilde çözdüm teşekkür ederim. Başka bir yöntem belirten olursa da mutlu olurum.
Saygılarımla
 
Üst