Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Fonksiyonlar
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Fonksiyonlar Bir fonksiyonun, nasıl işlediğini veya aradığınız bir işleme uygun olup olmadığını bu başlık altında sorabilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 19-03-2017, 20:52   #1
fasulye
Altın Üye
 
Giriş: 26/07/2005
Şehir: istanbul
Mesaj: 29
Excel Vers. ve Dili:
Excel 2010 - İngilizce Excel 2010 - Türkçe
Varsayılan SLA süresi hesaplama

Merhaba,

SLA Hesaplama konusunda yardıma ihtiyacım var,
SLA: Bir işi belirli bir değerde(zamanda, maliyette) yerine getirmek konusunda müşterinize veya patronunuza verdiğiniz tahhüt.

Örneğin çağrı merkezinde bir çağrıyı 20 saniye içinde cevaplamayı taahhüt ederseniz, 20 saniyeden önce cevaplanan çağrılarda taahhütünüzü yerine getirmiş olursunuz, ücretinizi alırsınız.
20 saniyeden fazla sürerse taahhütünüzü yerine getirememiş olursunuz,ücretinizi alamazsınız.
Buraya kadar basit, çağrı bitiş saatinden çağrı geliş saatini çıkartırsanız süreyi hesaplarız.
(Her çağrıda bir iş yaptığınızı varsayarsak)

Fakat bir çağrıda 1’den fazla iş yaparsanız farklı bir mantıkla hesaplama yapmak gerekiyor, benim yardım isteyeceğim alan burası.

Örnek saçma gelebilir, siz sonuca odaklanın;
Diyelim ki çok fazla talebi olan bir müşterinin çağrısı geldi, telefonla 2 müşteri temsilcisi konuşuyor.
Müşteri temsilcisi “A” bir işlemi yaparken, müşteri temsilcisi “B” başka bir işlemi yapıyor, ve karşıdaki müşterinin çok sayıda işlemi var.

Bu durumda hesaplama;
çağrının geldiği saati başlangıç almak yerine; o müşteri temsilcisinin yaptığı son işin bitiş saatini başlangıç almak. Müşteri temsilcisi "A"'nın yaptığı 2.iş için başlangıc saati, 1.işin bitiş saatidir.

Aksine; eğer çağrı geliş saatini başlangıç kabul edersek, son işlem en uzun süren iş olmuş olacak. Halbuki müşteri temsilcisi “A” son işi kısa bi sürede bitirmişti.


Ekte örnek bir tablo veriyorum, bulmak istediğim değer {İşlem} Süresi.(Sarı alan)
Eğer / İndis / Düşeara / Mak vb. formülleri denedim ancak beceremedim.
Az da olsa bir fikir verebilecek kimse olursa çok memnun olurum.
Cevap yazan ya da en azından okuyanların bile ellerine sağlık.
Eklenmiş Dosyalar
Dosya Türü: xlsx SLA Hesaplama.xlsx (8.9 KB, 14 Görüntülenme)
fasulye Çevrimdışı   Alıntı Yaparak Cevapla
Eski 19-03-2017, 23:22   #2
Ömer BARAN
Uzman
 
Giriş: 08/03/2011
Şehir: ANKARA / İSTANBUL
Mesaj: 7,980
Excel Vers. ve Dili:
Office 2013 TÜRKÇE
Varsayılan

Merhaba.

Aşağıdaki dizi formülüF2 hücresine uygulayın ve aşağı doğru kopyalayın.
.
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
=E2-EĞER(TOPLA.ÇARPIM(($A$2:$A2=A2)*($B$2:$B2=B2))=1;D2;KAYDIR($E$1;KÜÇÜK(EĞER($A$2:$A$12=A2;EĞER($B$2:$B$12=B2;SATIR($E$2:$E$12)));TOPLA.ÇARPIM(($A$2:$A2=A2)*($B$2:$B2=B2))-1)-1;0))
Dizi formülü olduğundan hücreye CTRL+SHIFT+ENTER ile girilmelidir.
İşlem doğru yapılmışsa formül kendiliğinden {....} şeklinde köşeli parantez içine alınır.
__________________
.
☾✭ İnadına TÜRKÇE ✭☽

-- Sorunuzu, gerçek belgenizle aynı yapıda ve olması gereken sonuçların elle yazıldığı örnek belge ile destekleyiniz.
-- ALTIN ÜYELİK öneriyorum. / FORUM KURALLARInı mutlaka okuyunuz.
-- ALTIN ÜYE olmayanlar, örnek belgeyi dosya.tc, dosya.co gibi bir siteye yükleyip, belgeye erişim adresini verebilir.
-- Özel mesaj ile soru sormayınız. / Geri bildirimde bulunulmayan cevaplarımı siliyorum.
Ömer BARAN Çevrimdışı   Alıntı Yaparak Cevapla
Eski 20-03-2017, 00:39   #3
numan şamil
Destek Ekibi
 
Giriş: 27/01/2011
Şehir: çorum
Mesaj: 979
Excel Vers. ve Dili:
Ofis 2010 Türkçe
Varsayılan

Merhaba
Ekli dosyayı inceler misiniz
Eklenmiş Dosyalar
Dosya Türü: xls SLA Hesaplama 1.xls (434.0 KB, 9 Görüntülenme)
numan şamil Çevrimdışı   Alıntı Yaparak Cevapla
Eski 20-03-2017, 19:11   #4
fasulye
Altın Üye
 
Giriş: 26/07/2005
Şehir: istanbul
Mesaj: 29
Excel Vers. ve Dili:
Excel 2010 - İngilizce Excel 2010 - Türkçe
Thumbs up

Alıntı:
Ömer BARAN tarafından gönderildi Mesajı Görüntüle
Merhaba.

Aşağıdaki dizi formülüF2 hücresine uygulayın ve aşağı doğru kopyalayın.
.
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
=E2-EĞER(TOPLA.ÇARPIM(($A$2:$A2=A2)*($B$2:$B2=B2))=1;D2;KAYDIR($E$1;KÜÇÜK(EĞER($A$2:$A$12=A2;EĞER($B$2:$B$12=B2;SATIR($E$2:$E$12)));TOPLA.ÇARPIM(($A$2:$A2=A2)*($B$2:$B2=B2))-1)-1;0))
Dizi formülü olduğundan hücreye CTRL+SHIFT+ENTER ile girilmelidir.
İşlem doğru yapılmışsa formül kendiliğinden {....} şeklinde köşeli parantez içine alınır.
Sayın Ömer Baran,

Ancak cevap yazabildim, çok teşekkür ederim, ellerinize sağlık.
fasulye Çevrimdışı   Alıntı Yaparak Cevapla
Eski 20-03-2017, 19:12   #5
fasulye
Altın Üye
 
Giriş: 26/07/2005
Şehir: istanbul
Mesaj: 29
Excel Vers. ve Dili:
Excel 2010 - İngilizce Excel 2010 - Türkçe
Thumbs up

Alıntı:
numan şamil tarafından gönderildi Mesajı Görüntüle
Merhaba
Ekli dosyayı inceler misiniz
Sayın Numan Şamil,

çok teşekkürler ilginize, ben sorunumu yukardaki formül ile çözdüm, verdiğiniz makro için çok teşekkürler,
Ancak buraya.PasteSpecial Paste:=xlValues kodunda bir hata veriyor, detaylı bilgim olmadığı için düzeltemedim,

saygılar
fasulye Çevrimdışı   Alıntı Yaparak Cevapla
Eski 20-03-2017, 21:11   #6
fasulye
Altın Üye
 
Giriş: 26/07/2005
Şehir: istanbul
Mesaj: 29
Excel Vers. ve Dili:
Excel 2010 - İngilizce Excel 2010 - Türkçe
Varsayılan

Alıntı:
Ömer BARAN tarafından gönderildi Mesajı Görüntüle
Merhaba.

Aşağıdaki dizi formülüF2 hücresine uygulayın ve aşağı doğru kopyalayın.
.
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
=E2-EĞER(TOPLA.ÇARPIM(($A$2:$A2=A2)*($B$2:$B2=B2))=1;D2;KAYDIR($E$1;KÜÇÜK(EĞER($A$2:$A$12=A2;EĞER($B$2:$B$12=B2;SATIR($E$2:$E$12)));TOPLA.ÇARPIM(($A$2:$A2=A2)*($B$2:$B2=B2))-1)-1;0))
Dizi formülü olduğundan hücreye CTRL+SHIFT+ENTER ile girilmelidir.
İşlem doğru yapılmışsa formül kendiliğinden {....} şeklinde köşeli parantez içine alınır.


Sayın Ömer Baran,

Formülünüzde anlayamadığım birkaç yer var, öğrenmek istiyorum, yardımcı olabilir misiniz;
Aşağıdaki alanların sözel ifadesi nedir acaba?
Topla.çarpım içinde de kullanmışsınız. Ancak mantığını öğrenmek istiyorum.

Peşinen teşekkürler.

TOPLA.ÇARPIM(($B$2:$B2=B2)*($C$2:$C2=C2))
($B$2:$B$12=B2;
($C$2:$C$12=C2;
fasulye Çevrimdışı   Alıntı Yaparak Cevapla
Eski 20-03-2017, 21:32   #7
Ömer BARAN
Uzman
 
Giriş: 08/03/2011
Şehir: ANKARA / İSTANBUL
Mesaj: 7,980
Excel Vers. ve Dili:
Office 2013 TÜRKÇE
Varsayılan

Formülün parçalarını, aynı satırda başka sütuna uygulayıp liste boyunca kopyalayın.
(ilgili işlevin parantezlerine dikkat edin, dizi formülü olduğunu unutmayın)

Bu şekilde daha iyi anlaşılacağını sanıyorum.

Mesele ilgili işlemin başlangıç zamanının tespiti değil mi?
-- Bir kişinin adına ilk rastlandığında....
-- Aynı kişinin hangi satırdaki işlemine bakıyoruz....
-- Aynı kişinin bir önceki işleminin bitiş zamanı....
.
__________________
.
☾✭ İnadına TÜRKÇE ✭☽

-- Sorunuzu, gerçek belgenizle aynı yapıda ve olması gereken sonuçların elle yazıldığı örnek belge ile destekleyiniz.
-- ALTIN ÜYELİK öneriyorum. / FORUM KURALLARInı mutlaka okuyunuz.
-- ALTIN ÜYE olmayanlar, örnek belgeyi dosya.tc, dosya.co gibi bir siteye yükleyip, belgeye erişim adresini verebilir.
-- Özel mesaj ile soru sormayınız. / Geri bildirimde bulunulmayan cevaplarımı siliyorum.
Ömer BARAN Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-03-2017, 18:47   #8
numan şamil
Destek Ekibi
 
Giriş: 27/01/2011
Şehir: çorum
Mesaj: 979
Excel Vers. ve Dili:
Ofis 2010 Türkçe
Varsayılan

Yanlış oldu.

Bu mesaj en son " 21-03-2017 " tarihinde saat 18:59 itibariyle numan şamil tarafından düzenlenmiştir....
numan şamil Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-03-2017, 18:57   #9
numan şamil
Destek Ekibi
 
Giriş: 27/01/2011
Şehir: çorum
Mesaj: 979
Excel Vers. ve Dili:
Ofis 2010 Türkçe
Varsayılan

Alıntı:
fasulye tarafından gönderildi Mesajı Görüntüle
Sayın Numan Şamil,

çok teşekkürler ilginize, ben sorunumu yukardaki formül ile çözdüm, verdiğiniz makro için çok teşekkürler,
Ancak buraya.PasteSpecial Paste:=xlValues kodunda bir hata veriyor, detaylı bilgim olmadığı için düzeltemedim,

saygılar
Merhaba
Kodları dener misiniz
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Sub Numan()
Dim bura As Range, buraya As Range
Dim k, i As Long
Dim sırala, sırala1
Application.ScreenUpdating = False
Range("I2:N" & Rows.Count).ClearContents
 Range("L2:N5635").NumberFormat = "hh:mm:ss"
 satır1 = 2
 For k = 2 To [B65536].End(3).Row
If Cells(k, 2).Value <> "" Then s = s + 1
Cells(k, 9).Value = s
Next k
 Range("b2:e65000").Copy
 Range("J2").PasteSpecial Paste:=xlValues
Application.CutCopyMode = False
son = Cells(Rows.Count, "J").End(3).Row
sırala = "I2:M" & son
sırala1 = "j2"
Range(sırala).Sort key1:=Range(sırala1), order1:=xlAscending
For i = 2 To [J65536].End(3).Row
If Range("K" & i).Value < 3 Then
Range("N" & i).Value = Range("M" & i).Value - Range("L" & i).Value
End If
If Range("K" & i).Value > 2 Then
If Range("J" & i).Value = Range("J" & i - 1).Value Then
Range("N" & i).Value = Range("M" & i).Value - Range("M" & i - 1).Value
End If
End If
Next i
son = Cells(Rows.Count, "J").End(3).Row
sırala = "I2:N" & son
sırala1 = "I2"
Range(sırala).Sort key1:=Range(sırala1), order1:=xlAscending
Range("F2:F" & Rows.Count).ClearContents
Range("N2:N65536").Copy
Range("F2").PasteSpecial Paste:=xlValues
Application.CutCopyMode = False
Range("I2:N" & Rows.Count).ClearContents
Range("F1").Select
Application.ScreenUpdating = True
MsgBox "İşlem tamam."
End Sub
numan şamil Çevrimdışı   Alıntı Yaparak Cevapla
Eski Dün, 01:29   #10
Ömer BARAN
Uzman
 
Giriş: 08/03/2011
Şehir: ANKARA / İSTANBUL
Mesaj: 7,980
Excel Vers. ve Dili:
Office 2013 TÜRKÇE
Varsayılan

Merhaba.

Bir de makro alternatifi vereyim;
-- verilerin bulunduğu sayfaya bir düğme/şekil/metin kutusu ekleyin,
-- alt taraftan verilerin olduğu sayfa adına fareyle sağ tıklayıp KOD GÖRÜNTÜLEyi seçin,
-- açılan VBA ekranında sağ taraftaki boş alana aşağıdaki kod'u yapıştırın,
-- sayfaya eklediğiniz düğme/şekil/metin kutusuna fareyle sağ tıklayıp MAKRO ATAyı seçin,
-- açılan küçük ekranda SLA_BRN'yi seçerek işemi onaylayın,
-- sayfadaki düğme/şekil/metin kutusuna fareyle tıklayarak kod'un çalışmasını sağlayın.
.
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Sub SLA_BRN()
son = Cells(Rows.Count, 1).End(3).Row: Set wf = Application.WorksheetFunction
Range("F2:F" & son).ClearContents
For brn = 2 To son
    If Cells(brn, "A") <> Cells(brn - 1, "A") Then
        Cells(brn, "F") = Cells(brn, "E") - Cells(brn, "D"): End If: Next
For brna = 2 To son
    If Cells(brna, "F") = "" Then
        ilk = wf.Match(Cells(brna, "A"), Range("A:A"), 0)
        If wf.CountIf(Range(Cells(ilk, "B"), Cells(brna, "B")), Cells(brna, "B")) = 1 Then
            Cells(brna, "F") = Cells(brna, "E") - Cells(brna, "D"): GoTo 20: End If
                For brnb = ilk To brna - 1
                    If Cells(brna, "B") = Cells(brnb, "B") Then bbit = brnb
                Next
            Cells(brna, "F") = Cells(brna, "E") - Cells(bbit, "E")
    End If
20:    Next
MsgBox "İşlem tamamlandı..", vbInformation, "..::.. Ö. BARAN ..::.."
End Sub
__________________
.
☾✭ İnadına TÜRKÇE ✭☽

-- Sorunuzu, gerçek belgenizle aynı yapıda ve olması gereken sonuçların elle yazıldığı örnek belge ile destekleyiniz.
-- ALTIN ÜYELİK öneriyorum. / FORUM KURALLARInı mutlaka okuyunuz.
-- ALTIN ÜYE olmayanlar, örnek belgeyi dosya.tc, dosya.co gibi bir siteye yükleyip, belgeye erişim adresini verebilir.
-- Özel mesaj ile soru sormayınız. / Geri bildirimde bulunulmayan cevaplarımı siliyorum.
Ömer BARAN Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 02:22


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Hurda - Torna - Çorlu Web Tasarım - Tarot Falı - Fenerbahçe Haberleri - Trakya Haberleri - Investing - Hurda - Kobi Danışmanlık - Tekirdağ Samsung - Kozmetik Ürünler - Sağlıklı Makyaj Ürünleri - Yaşlanma Karşıtı Ürünler - Excel Eğitimi - Çorlu OSGB - Lingerie - Dyeing Machine - Çorlu Temizlik- Didim Çatı İnşaat
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden