Çözüldü Dosya verilerini karşılaştırma

[hakki83]

Selamlar

Şu linkte Sn Aegnor hocamızın paylaştığı bir kod bütünü vardır, fakat nasıl çalıştığını anlayamadığım için sormak istedim.

https://excelcozum.com/konu/dosya-verilerini-karsilastirma.572/

 

[aeGNoR]

Paylaştığım kodlar tek başına bir anlam ifade etmiyor. Çünkü bir prosedür değil fonksiyon olduğu için.
Kod bloğu true ya da false olacak şekilde boolean değer döndürür.

Kod kısaca şu mantıkla çalışıyor; dileyilm ki a.jpg adında bir dosyanız var ve siz bu dosyanızı başka bir yere b.jpg olarak bir daha kaydettiniz. Kod bu iki farklı isimdeki dosya bilgilerini (içeriğini) karşılaştırıp aynı ise true değil ise false değer döndürüyor. Sonuca göre ne yapmak istediğiniz sizin elinizde tabi.

 

[hakki83]

Paylaştığım kodlar tek başına bir anlam ifade etmiyor. Çünkü bir prosedür değil fonksiyon olduğu için.
Kod bloğu true ya da false olacak şekilde boolean değer döndürür.

Kod kısaca şu mantıkla çalışıyor; dileyilm ki a.jpg adında bir dosyanız var ve siz bu dosyanızı başka bir yere b.jpg olarak bir daha kaydettiniz. Kod bu iki farklı isimdeki dosya bilgilerini (içeriğini) karşılaştırıp aynı ise true değil ise false değer döndürüyor. Sonuca göre ne yapmak istediğiniz sizin elinizde tabi.

Peki sayın hocam eğer size zahmet olmazsa, biz amatörler için bu kodları, somut birer dosya haline dönüştürebilir misiniz?

Örnek olarak son paragrafta bahsettiğiniz;
Aynı resmi hem a.jpg hem de b.jpg olarak; ve bulmak istiyoruz. Ama bunu nasıl yapacağız?

 

[aeGNoR]

Peki sayın hocam eğer size zahmet olmazsa, biz amatörler için bu kodları, somut birer dosya haline dönüştürebilir misiniz?

Örnek olarak son paragrafta bahsettiğiniz;
Aynı resmi hem a.jpg hem de b.jpg olarak; ve bulmak istiyoruz. Ama bunu nasıl yapacağız?

Somut bir örnek hazırlayabilirim gün içerisinde. Fakat bunun için biraz beklemeniz gerekecek.

 

[hakki83]

Somut bir örnek hazırlayabilirim gün içerisinde. Fakat bunun için biraz beklemeniz gerekecek.

Memnuniyetle. Ne zaman müsait olursanız sayın hocam.

 

[aeGNoR]

Diyelim ki Dosya1.png ve Dosya2.png adında 2 farklı dosyamız var ve biz bunların aynı dosyalar olduğunu tespit etmek istiyoruz.
Bu durumda aşağıdaki kodları uygulamamız gerekiyor.

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

DosyaKontrol prosedüründeki aşağıdaki satır FileComparison fonksiyonunu işletip bize doğru ya da yanlış değerleri döndürür

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Doğru değeri döndürmesi halinde aşağıdaki if bloğu içine girerek dosya silme işlemini yapar:

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Bu kodlar iki farklı tek dosya için uygulandığında çok mantıklı görünmeyebilir. Fakat bu kodlar 2 farklı klasördeki yüzlerce farklı dosya üzerinde uygulandığı zaman çok güzel bir anlam kazanıyor. Şimdilik onunla ilgili bir örnek hazırlama vaktim olmadı. Fakat en kısa zamanda kodun asıl amacına uygun uygulamayı yapıp sizinle paylaşacağım.

 

[hakki83]

Ekli dosyayı görüntüle 2218
Diyelim ki Dosya1.png ve Dosya2.png adında 2 farklı dosyamız var ve biz bunların aynı dosyalar olduğunu tespit etmek istiyoruz.
Bu durumda aşağıdaki kodları uygulamamız gerekiyor.

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

DosyaKontrol prosedüründeki aşağıdaki satır FileComparison fonksiyonunu işletip bize doğru ya da yanlış değerleri döndürür

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Doğru değeri döndürmesi halinde aşağıdaki if bloğu içine girerek dosya silme işlemini yapar:

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Bu kodlar iki farklı tek dosya için uygulandığında çok mantıklı görünmeyebilir. Fakat bu kodlar 2 farklı klasördeki yüzlerce farklı dosya üzerinde uygulandığı zaman çok güzel bir anlam kazanıyor. Şimdilik onunla ilgili bir örnek hazırlama vaktim olmadı. Fakat en kısa zamanda kodun asıl amacına uygun uygulamayı yapıp sizinle paylaşacağım.

Aegnor hocam emeğinize sağlık, merakla bekleyeceğim

 

[hakki83]

Ekli dosyayı görüntüle 2218
Diyelim ki Dosya1.png ve Dosya2.png adında 2 farklı dosyamız var ve biz bunların aynı dosyalar olduğunu tespit etmek istiyoruz.
Bu durumda aşağıdaki kodları uygulamamız gerekiyor.

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

DosyaKontrol prosedüründeki aşağıdaki satır FileComparison fonksiyonunu işletip bize doğru ya da yanlış değerleri döndürür

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Doğru değeri döndürmesi halinde aşağıdaki if bloğu içine girerek dosya silme işlemini yapar:

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Bu kodlar iki farklı tek dosya için uygulandığında çok mantıklı görünmeyebilir. Fakat bu kodlar 2 farklı klasördeki yüzlerce farklı dosya üzerinde uygulandığı zaman çok güzel bir anlam kazanıyor. Şimdilik onunla ilgili bir örnek hazırlama vaktim olmadı. Fakat en kısa zamanda kodun asıl amacına uygun uygulamayı yapıp sizinle paylaşacağım.

Aegnor hocam hiç yapamadım. Sanıyorum en güzeli kod değil de içinde kodların olduğu excel dosyası olması.

 

[Refaz]

boolKontrol = FileComparison(ThisWorkbook.Path & "\Dosya1.png", ThisWorkbook.Path & "\Dosya2.png")

Merhaba @hakki83 abey.
Kodları denemedim ama anladığım kadarıyla yukardaki koddaki Dosya1 ve Dosya2 adında resim dosyadı yapıp uzantısunı png olarak ayarlayın ve excelin olduğu aynı dizinde olsunlar ve Dosya kontrol sub unu çalıştırın sadece.

 

[Refaz]

Aslında kod alttaki gibi daha kısalabilir.

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

 

[Refaz]

Silinsinmi diye soru ekledim ve karşılaştırma dosya yoksa mesaj verir.
aeGNoR abyin kodunu düzenledim biraz

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

 

[aeGNoR]

Kodların çoğunu işimde kullanmak için tasarladığımdan bazı kontrolleri ve yapılması gerekenleri yapmıyorum kullanıcısı kendim olduğum için. Bazı kısımlarını da çıkarıyorum en sade haline getirmeye çalışıyorum kullanıcı kendi isteğine göre kullanıp uygulasın diye. Sizin dosyanız daha kullanışlı olmuş, elinize sağlık.

 

[Refaz]

Kodların çoğunu işimde kullanmak için tasarladığımdan bazı kontrolleri ve yapılması gerekenleri yapmıyorum kullanıcısı kendim olduğum için. Bazı kısımlarını da çıkarıyorum en sade haline getirmeye çalışıyorum kullanıcı kendi isteğine göre kullanıp uygulasın diye. Sizin dosyanız daha kullanışlı olmuş, elinize sağlık.

Sizinde elinize sağlık abey.Mecbur kalıyoruz bazen kodlara şartlar eklemeye abey konuyu açan üstadlar anlamıyor çünkü.

 

[aeGNoR]

Sizinde elinize sağlık abey.Mecbur kalıyoruz bazen kodlara şartlar eklemeye abey konuyu açan üstadlar anlamıyor çünkü.

Müsaadenizle çözüm olarak işaretliyorum.