İki Worksheet_change Kodunu Birleştirme

[valentino06]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

Öncelikle Sayın Cakarem Hocam çok teşekkür ederim. yapmış olduğunuz kod çok güzel çalışıyor. Yalnız Aynı sayfada " İki Worksheet_Change Kodu" Hata veriyor. lütfen aşağıdaki 2 kodu birleştirme imkanımız var mı? Yardımlarınızdan Dolayı Çok Teşekkür ederim. Kodlar aşağıdadır.
Not: Kodları Ayrı Ayrı Çalıştırdığımda sorunsuz Çalışıyorlar. Sayfa isimleri doğrudur. ( Sheet1 - Sheet6 )
1.)Kod:

Bu kodu görmek için giriş yapmanız gerekmektedir (14 satır). Giriş Yap

2.)Kod:

Bu kodu görmek için giriş yapmanız gerekmektedir (11 satır). Giriş Yap

 

[Ömer BARAN]

Sayın @valentino06 .

Yanlış düşünmüyorsam, aşağıdaki şekilde tek kod haline getirilebilir.
Denemeler yapınız.

Bu kodu görmek için giriş yapmanız gerekmektedir (22 satır). Giriş Yap

 

[Ömer BARAN]

Önce bundan önceki cevabıma bakınız.

İkinci kodda satırın 8 ve sonraki satırlar olması koşulu yok.
8 ve devamı satır olma koşulu bu kod için de varsa; verdiğim koddaki Elseif..... satırını aşağıdaki gibi değiştirin.

ElseIf (Target.Column = 22 Or Target.Column = 27) And Target.Row > 7 Then

.

 

[valentino06]

Sayın Ömer Baran Hocam Çok Teşekkür ederim. kod çok güzel çalışıyor. Elinize ve Emeğinize Sağlık. Allah Yolunuzu Açık Etin.İnşallah
Saygılarımla,
İyi günler.