Aynı girişleri bulmak

[ZeNgen]

Merhaba;

Forumda araştırdım fakat bir türlü bulamadım birde excel kullanmayı bilirim ama iş, makro ve formüllere gelince ustalarımdan biraz yardım almaya ihtiyaç duyuyorum.

Benim problemim 2 kişi aynı IP adresinden aynı gün içinde farklı saatlerde giriş yapmış ve ben bu girişlerin birbirine en yakın olan ve girilen saatlerini bulmak istiyorum aşağıda örnek bir dosya verdim ilgilenen olursa çok ama çok sevinicem çünkü ben bunları tek tek kontro ederek ayırarak yapıyorum.

şimdiden çok teşekkürler.

 

[ZeNgen]

Cevap veren olmadı hala bir bilen yokmuydu.

 

[janveljan]

Dosyayı inceleyin anladığım kadarıyla yapmaya çalıştım.

 

[ZeNgen]

uzmanım emeğiniz için teşekkür ederim ama ben IP saat ve isimleri ayırmaya çalışmıyorum ekte tekrar örneklendireyim.

 

[janveljan]

Tamam en son çıkan sonucu incelerseniz, orada önce sizin girişleriniz onun yanında da diğer kişinin giriş bilgileri yer alıyor aradada bu iki giriş arasındaki süreyi veren sütun var ve bu girişler aynı gün içinde aynı ipden yapılan birbirine en yakın girişler. Yani her satırda o güne ait en yakın girişler var

 

[janveljan]

Bu haliyle inceleyin

 

[ZeNgen]

Evet makroyu eklememişim ekleyip çalıştırdım ama bu seferde saatleri ve aradaki farkları 39824,76793 şeklinde vermeye başladı bunu Hücreleri Biçimlendir deyip düzelttim fakat bir başka taramada sonuç aynı oluyor bunu değiştire bilirmiyiz peki.

 

[janveljan]

kodların en sonuna bu kodları da eklerseniz düzelir.

    Range("K:K,O:O").Select
    Selection.NumberFormat = "dd/mm/yyyy hh:mm:ss"
    Columns("N:N").Select
    Selection.NumberFormat = "[$-F400]h:mm:ss AM/PM"

 

[ZeNgen]

Evvvet şimdi gayet güzel oldu ellerinize sağlık diyorum uzmanım teşekkür ederim.

 

[ZeNgen]

Son birşey daha sorucam hocam ben buna 3 ve 4. kişi daha ekleye bilirmiyim.

 

[janveljan]

Bu haliyle olmaz, üzerinde çalışmak lazım. Ama arkadaşlar farklı çözümler bulabilir belki kişi sayısının arttırılabileceği.

 

[ZeNgen]

Peki hocam emeğinize teşekkür ediyorum tekrar çok saolun.

 

[janveljan]

Birşey değil. Elinizde üç kişilik bir örnek varsa onun üzerinde çalışıp belki bir çözüm bulabilirim.

 

[ZeNgen]

Malesef yok hocam ilginize teşekkür ederim.