Müşteri takip formu

[kemaldemir]

MÜŞterİ Takİ Raporu

A-B-C-D sayfalarındaki günlük işlemleri rapor sayfasına belge,fat no kriterlerine göre sıralama yapabilmem için nasıl bir formül yazmam konusunda yardımcı olabilirmisiz. tek bir sayfa olsa yapabiliyorum fakat sayfa sayısı arttıkca işler karışmaya başlıyor. en azından bir fikir veya örnek gönderebilirseniz çok memnun olurum. herkese başarılar dilerim.

 

[kemaldemir]

A-B-C-D sayfalarındaki günlük işlemleri rapor sayfasına belge,fat no kriterlerine göre sıralama yapabilmem için nasıl bir formül yazmam konusunda yardımcı olabilirmisiz. tek bir sayfa olsa yapabiliyorum fakat sayfa sayısı arttıkca işler karışmaya başlıyor. en azından bir fikir veya örnek gönderebilirseniz çok memnun olurum. herkese başarılar dilerim.

 

[EALKAN]

Örnek Dosyanizi GÖnderİrsenİz Dosya Üzerİnde Yardimci Olabİlİrİm.

 

[Ferhat Pazarçevirdi]

Benim aklıma, KTF-Kullanıcı Tanımlı Fonksiyonlar (UDF-User Defined Functions) geliyor ama dosyanıza bakmak lazım ....

 

[kemaldemir]

Örnek dosya ektedir. ilgilenen arkadaşlara şimdiden teşekkür ederim

 

[Orion1]

Bir müşteriye 2 ayrı kişi gitmişse ne olacak?
Ve birde ts.Elemanlarının bulunduğu sayfada Belge Türünde (C sütununda)SBF PKF ve TES:F yazıyor sanırım o sütunun yanındak B sütunundan PFK.NO lar alınacak ama SBF veya TES.F yazıyorsa onlar ne olacak?

 

[kemaldemir]

ilginize çok teşekkür edrim sayın evren. bir müşt. iki kişi veya daha fazla eleman gitmiş olsa dahi sadece bir tanesi pkf(periyodik kontrol)yapıyor. diğerleri arıza durumlarında gidiyor. dolayısıyla sadece pkf no yazan rapor sayfasına geçecek. not: rapor sayfası sadece pkf ler için düzenleniyor. sbf ve start yada teslim formu yazanlar rapor a geçmeyecek. Sizin yardımlarınızdan sonra ben becerebilirsem onlar için ayrı bir rapor sayfası hazırlamaya çalışacağım. yardımlarınız için şimdiden çok teşekkür ederim.

 

[Orion1]

Dosyanız hazır.
Yalnız Elemanların bulunduğu sayfada ki müşteri adları ile rapor sayfasındaki müşteri adları tutmuyor.Bir tanesi tutuyor.Onada Ali gitmiş.

Sub rapor()
Dim syf As Worksheet, k As Range
Application.ScreenUpdating = False
For Each syf In Worksheets
    If syf.Name <> "RAPOR" And syf.Name <> "AÇIKLAMA" Then
        sat = syf.Cells(65536, "B").End(xlUp).Row
            For i = 2 To sat
                If UCase(syf.Cells(i, "C").Value) = "PKF" Then
                    Set k = Sheets("RAPOR").Range("B2:B65536").Find(syf.Cells(i, "D").Value _
                    , , xlValues, xlWhole)
                    If Not k Is Nothing Then
                        Sheets("RAPOR").Cells(k.Row, "C").Value = syf.Cells(i, "B").Value
                        Sheets("RAPOR").Cells(k.Row, "D").Value = syf.Cells(i, "H").Value
                        Sheets("RAPOR").Cells(k.Row, "E").Value = syf.Name
                        Set k = Nothing
                    End If
                End If
            Next i
    End If
Next syf
Application.ScreenUpdating = True
MsgBox "İşlem Tamamlandı..!!", vbOKOnly + vbInformation, Application.UserName
                        
End Sub

 

[kemaldemir]

dosya ektedir

ilginize şimdiden çok teşekkür ederim

 

[Orion1]

Aşğağdaki açmış olduğunuz başlıkta bu soruyu cevapladım.Anlaşılan bakmamışsınız.Ayrıca bir konu hakkında 2 başlık açmayalım lütfen.
http://www.excel.web.tr/showthread.php?goto=newpost&t=49367

 

[kemaldemir]

sayın evren, sizden ricam yazdığınız kodların işlem mantığı veya suıralaması nedir. hangi sıralama,kriterler,verilere göre işlem yapıyor. bilgi vermeniz mümkün mü acaba.

 

[Orion1]

adı RAPOR ve AÇIKLAMA olmayan sayfalarda C sütununda PKF değerini arıyor.
Sayfalara küçük index'ten büyük index'e doğru bakılıyor.Bir sayfada İlk satırdan son satıra kadar tarama yapılıyor.
Eğer PKF değerini bulursa Bu sefer D sütununda Müşteri adını okuyor.
Sonra Müşteri adını RAPOR sayfasında Arıyor.Eğer bulursa Rapor sayfasının C sütunundaki müşterinin satırına servis eleman sayfasındaki B sütunundaki belge nosunu yazıyor.D sütununa H sütununu E sütununa Sayfa adını yazıyor.
Siz böyle istemişsiniz bende aynisini yaptım.Ancak sizin Rapor sayfasındaki müşteri adları ile Teknik servis elemanlarının bulunduğu sayfalardaki müşteri adları birbirini tutmuyor.Bir tanesi tutuyor.Onada Ali gitmiş.