• Foruma hoş geldin 👋 Ziyaretçi

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Soru VBA Döngü sonuç vermiyor

E

exceling

Yeni Üye
Kullanıcı Bilgileri
Katılım
29 Ağu 2023
Mesajlar
11
Aldığı beğeni
1
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
Arkadaşlar merhaba
Excelde büyük veri ile çalışıyorum. Belli kriterlere göre belli satırları işaretlemem gereken aşağıdaki vba kodunu yazdım fakat kodum doğru olmasına rağmen verim çok büyük olduğu için sonuç alamıyorum. Bu konuyu acil çözmem gerekiyor. Lütfen yardımcı olur musunuz? Küçültülmüş bir dosyayı ekte paylaştım.

Sub makro ()
For i=2 to 11000
For t=2 to 500000
If Range("B"&i).Value=Range("E"&t).Value Then
If Range("C"&i).Value=Range("F"&t).Value Then
If Range("D"&i).Value=Range("G"&t).Value Then
Range("A"&t).Value="var"
End If
End If
End If
Next t
Next i
End Sub
 

Ekli dosyalar

  • örnek.xlsx
    9.7 KB · Gösterim: 14
Tarihe göre sırala Oylara göre sırala
cevabınız içi teşekkür ederim fakat kod istediğim şekilde çalışmıyor. ben var mı yok mu diye kontrol yapmak istemiyorum. istediğim şey hangi satırda gerekli şartların sağlandığı. bu kodda 11 bininci satıra kadar var yazıyor. ama ben bu şartların 500 bin satırlık kısımda hangi satırda sağlandığını bulmak istiyorum. umarım anlatabilmişimdir. ilginiz için teşekkürler.
 
Olumlu oy 0 Negatif oyla
B kolonunda olan değerleri E kolonunda arıyoruz.

B'deki bir değer E'de birden fazla olabilir mi? Ve fazla olduğunda yapacağımız bir şey var mı? Örneğin E'deki değerlerden ilkini, sonuncusu ya da hepsi gibi.

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 

Ekli dosyalar

  • VarolanlarıSirala.xlsm
    16.4 KB · Gösterim: 1
Olumlu oy 0 Negatif oyla
Şu konuya dikkat edelim: B'deki bir değer için E'de koşullar sağlandığında o değer için arama son buluyor. Bu davranış uygun değilse onu belirtmelisiniz.
 
Olumlu oy 0 Negatif oyla
son bulmaması gerekiyor. şartları sağlayan tüm satırların yanında var yazmasını istiyorum. ama belirttiğim gibi B=E, C=F ve D=G üç şartı aynı anda sağlamalı
 
Olumlu oy 0 Negatif oyla
bu kod çalışıyor gibi ama ben hangi satırda varsa A sütununun o satırına var yazsın istiyorum. kaçıncı satırda oldukları yazıyor bu kodda
 
Olumlu oy 0 Negatif oyla
Eğer bu da sizin istediğiniz değilse lütfen şu şekilde yazın: A kolonda şunu, I'da bunu istiyorum gibi.
 
Olumlu oy 0 Negatif oyla
küçültülmüş verimde çalışıyor faka büyük veride lstRow = ActiveSheet.Cells(Rows.Count, 2).End(xlUp).Row şu satırda wrong number of arguments or invalid property assignment hatası alıyorum
 
Olumlu oy 0 Negatif oyla
Bilgisayarım yanımda değil o yüzden kontrol edemedim Alttaki kodu siz kontrol eder misiniz ?
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Olumlu oy 0 Negatif oyla
aşağıdaki kodu dener misiniz?
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Olumlu oy 0 Negatif oyla
kodların sonuç vermesi uzun sürüyor. yarın denemeye devam edeceğim. şimdilik hepsi küçültülmüş veride çalışıyor.
 
Olumlu oy 0 Negatif oyla
Cevap yazmak için giriş yap yada kayıt ol.

Konuyu okuyanlar

Toplam: 2 (Kullanıcı: 0, Ziyaretçi: 2)
Geri
Üst