İki Worksheet_Change Kodunu Birleştirme

valentino06

Kullanıcı
Katılım
4 May 2018
Mesajlar
256
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:
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(14 satır)

2.)Kod:
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(11 satır)
 
Veri Aktarma Hk.
Değer Hatası Veren Yerlere Sıra Numarası Verme
Tarihe göre sırala Oylamaya göre sırala
Sayın @valentino06 .

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

CPP: 
İndirmek için giriş yapmanız gerekmektedir.
(22 satır)
 
Oyla 0 Olumsuz oyla
Ö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

.
 
Oyla 0 Olumsuz oyla
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.
 
Oyla 0 Olumsuz oyla
Yanıt için giriş yapmanız veya üye olmanız gerekir.
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt