Çözüldü İki Hücre Eşit Değilse Satırı Farklı Sayfaya Kopyalasın

[Erdogan34]

Merhabalar,

Bir satırda bulunan iki tarihin birbirine eşit olmaması durumunda ilgili satırı komple farklı bir sayfaya taşımayı amaçlıyorum. Örnek bir dosya ekledim. Sarı renge boyadığım sütunlardaki verilerin eşitliği esas alınacak.

Desteğinizi rica ediyorum.

 

[excelcan]

deneyiniz.
kolay gelsin.

 

[berhudarolemi]

excelcan dakika farkıyla paylaşmış benimkide alternatif olsun
deneyiniz makroyu çalıştırınız kod içindeki sayfa isimlerini kontrol ediniz

 

[Erdogan34]

deneyiniz.
kolay gelsin.

Çok teşekkür ederim. Emeğinize sağlık.

 

[Erdogan34]

excelcan dakika farkıyla paylaşmış benimkide alternatif olsun
deneyiniz makroyu çalıştırınız kod içindeki sayfa isimlerini kontrol ediniz

Kes yapıştır modeli ile çalışıyor. Bu da referans bir çalışma olmuş emeğinize sağlık. Teşekkürler.

 

[Alpi]

Merhaba.
Alternatif.
Aşağıdaki kodu bir modüle kopyalayıp çalıştırın.
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[Erdogan34]

Merhaba.
Alternatif.
Aşağıdaki kodu bir modüle kopyalayıp çalıştırın.
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

Muhteşem olmuş emeğine sağlık. Aşağıdaki satırı da yorumlayınca kopyala yapıştır oldu direkt.

'.Range("A" & Bak & ":Y" & Bak).Delete Shift:=xlUp