Üstadların mükerrer kayıtlar başlığı altında yapmış olduğu örnekler içerisinde bulunan aşağıdaki makroyu pekçok tablomu oluştururken kullanıyorum. Ancak makro exceli çok yavaşlatıyor. İlişikte bununla ilgili küçük bir örnekde ekledim, veriler normalde kullandığımdan çok daha az olmasına rağmen kısmen yavaşlatıyor. Bu makronun olduğu dosya açıkken bağımsız başka bir excel dosyasında bile yavaşlamaya sebep oluyor.
Bu yavaşlamaya bu makroda değişiklik veye başka bir makro ile çözüm getirilebilir mi ?
Yardımlarınız için çok teşekkür ederim.
Function Benzersiz(Aralik As Range, i As Integer)
Application.Volatile
Dim ciftolmayan As New Collection
For Each ce In Aralik
On Error Resume Next
ciftolmayan.Add ce, CStr(ce)
Next ce
If i > ciftolmayan.Count Then
Benzersiz = ""
Else
Benzersiz = ciftolmayan(i)
End If
End Function
Bu yavaşlamaya bu makroda değişiklik veye başka bir makro ile çözüm getirilebilir mi ?
Yardımlarınız için çok teşekkür ederim.
Function Benzersiz(Aralik As Range, i As Integer)
Application.Volatile
Dim ciftolmayan As New Collection
For Each ce In Aralik
On Error Resume Next
ciftolmayan.Add ce, CStr(ce)
Next ce
If i > ciftolmayan.Count Then
Benzersiz = ""
Else
Benzersiz = ciftolmayan(i)
End If
End Function
