EXCEL'ÃN VERÃ KAPASÃTESÃ
Herkese selamlarımla;
Excelde veri sayfasındaki verilerin içinden birden fazla girilmiş olanları bir başka sayfaya makro yardımıyla aktarıyoruz. Fakat elimizde 120.000 adet veri var bu kadar veriyi Bir seferde sorgulayabilmemiz mümkünmüdür. Excel' in 65.000 veri ile sınırlı olduğu düşünülürse.
AYNI KAYITLARI RAPORLAMAK KONU BAÃLIKLI soruma karşılık
Sayın Levenm aşağıdaki kodu bu iş için göndermişti ve çokta işimize yaradı. Ama verilerin 120.000 olması durumunda bir altarnatif teklifiniz varmıdır. Ã?renk gönderiyorum incelerseniz sevinirim.
Herkese selamlarımla;
Excelde veri sayfasındaki verilerin içinden birden fazla girilmiş olanları bir başka sayfaya makro yardımıyla aktarıyoruz. Fakat elimizde 120.000 adet veri var bu kadar veriyi Bir seferde sorgulayabilmemiz mümkünmüdür. Excel' in 65.000 veri ile sınırlı olduğu düşünülürse.
AYNI KAYITLARI RAPORLAMAK KONU BAÃLIKLI soruma karşılık
Sayın Levenm aşağıdaki kodu bu iş için göndermişti ve çokta işimize yaradı. Ama verilerin 120.000 olması durumunda bir altarnatif teklifiniz varmıdır. Ã?renk gönderiyorum incelerseniz sevinirim.
Kod:
Sub mukerrer()
Set s1 = Sheets("veri")
Set s2 = Sheets("çift kayıt")
s2.[a2:z65536].ClearContents
For a = 2 To s1.[b65536].End(3).Row
If WorksheetFunction.CountIf(s1.Range("b2:b65536"), s1.Cells(a, 2)) > 1
Then
c = c + 1
For b = 1 To 21
s2.Cells(c + 1, b) = s1.Cells(a, b).Value
Next
End If
Next
MsgBox "KAYITLAR AKTARILDI"
End Sub