AccessTr.neT

Sayfalar: 1 2 3 4

KategoriListesi sayfasındaki P15 hücresinden bahsediyorsunuz galiba.

KategoriListesi sayfasının H sütununda yok zaten.

Alttaki koduda deneyebilirsiniz fakat biraz uzun sürer.Sonuçta aynı sonuç veriyor önceki eklediğim kodla.

Kod:
Dim bul As Range

    Dim say As Integer

    Dim s1 As Worksheet: Set s1 = Sayfa1

    Dim s13 As Worksheet: Set s13 = Sayfa13

    say = 12

    Application.ScreenUpdating = False

    With s13

        .Range("P12:P" & Rows.Count).ClearContents

        For i = 2 To s1.Cells(Rows.Count, "F").End(3).Row

            On Error Resume Next

            Set bul = .Range("H:H").Find(s1.Cells(i, "F").Value, , xlValues, 1)

            If bul Is Nothing Then

                .Cells(say, "P").Value = s1.Cells(i, "F").Value

                say = say + 1

            End If

        Next

      If say > 0 Then .Range("P12:P" & say).RemoveDuplicates Columns:=1, Header:=xlNo

    End With

    Application.ScreenUpdating = True

    MsgBox "Bitti", vbInformation

    Set bul = Nothing

    Set s1 = Nothing

    Set s13 = Nothing

Yada gifteki gibimi sonuç olacak?Detay kelimelerinden aırdım.Malisef tam anlaşılmadığı için bu kadar oldu.

Eklediğim sayfadan acaba birşeyler anlaşılıyor mu acaba, bunun gibi olmasını istiyorum. Kategori haricindeki suçların listesini başka sayfaya listelesin istiyorum. Kategoriye girenleri tabloya sayıyor, veri sayfasında kategori sayfasında sayılmayanları da başka bir sayfaya tablo şeklinde suçların isimlerini sıralasın ki ben hangileri istatistik sayılarında olmadığını göreyim. Baya bir uğraşıyorum hangileri girmemiş diye... teşekkürler.

Ek dosyayı bir önceki mesajımda ekleyemedim. İnşallah şimdi yüklerim.
Yine ekleyemedim. Link olarak ekliyorum inşallah sorun olmaz. https://www.dosya.tc/server27/9tnw5p/Kat...0.rar.html

Sayın farez bey yaptığınız çalışmayı inceledim. Kategori listesinde bulunan suçlardan veri sayfasından formülle saydırma işlemi yaptım. Yalnız orada şöyle bir incelik var. Kategori sayfasındaki suçlar ile başlayıp son tarafı belli olmayanları formülle kategori sayfasındaki sütuna saymakta ve suçların sayısını vermektedir. Burada bir sıkıntı yok.
Benim istediğim kategori listesindeki suçlar ile başlamayan ve sonu belli olmayan her satırın suç isimlerini bulmak istiyorum. Sizin hazırladığınız kodlar kategori listesindeki suçlarla bire bir olanları buluyor güzel olmuş, suçlar uzun olabilmektedirler. Gif te bulunanı inceledim suçları bir bir içerirleri süzme sayısını bulmak baya bir zaman alacak doğru anlamışsam...

Biz kriter olarak;
****Kategori sayfasındakilerle başlayanlar ve sonu belli olmayanları formülle bulduk
****Kategori sayfasındakilerle başlamayanlar ve sonu belli olmayanların listesini bulmak

Sayfalar: 1 2 3 4

feraz

feraz

feraz

yyhy

yyhy

yyhy