Herkese iyi forumlar,
https://excelcozum.com/konu/belli-kriterlere-gore-stoktan-dusme.7648/#post-59450 bu konuyu açmıştım daha önce. Bu konuda istediğim şey 5 satır içindi. Aslında 5. satır ile 205. satır için yapmak istiyordum. Ama kendim kodu ekleyip başarabileceğimi düşündüm. Kodun başına;
Dosyayı tekrar paylaşmadım çünkü forum linki üzerinde mevcut. Ayrıca kodlarda orada mevcut bir daha paylaşmam gerekirse paylaşabilirim.
Şimdiden yardımlarınız için teşekkür ederim.
https://excelcozum.com/konu/belli-kriterlere-gore-stoktan-dusme.7648/#post-59450 bu konuyu açmıştım daha önce. Bu konuda istediğim şey 5 satır içindi. Aslında 5. satır ile 205. satır için yapmak istiyordum. Ama kendim kodu ekleyip başarabileceğimi düşündüm. Kodun başına;
- Dim j As Integer ekledim.
- For döngüsünün başına yeni bir for daha ekledim; For j = 5 To 205.
- Mevcut If wsXXX.Range(hücreler(i) & "5").Value = "ü" Then komutunda bulunan "5" değerlerini j ile değiştirdim; If wsXXX.Range(hücreler(i) & j).Value = "ü" Then
- En sona da Next j komutunu ekleyerek komutun çalışacağını düşündüm ama olmadı. Bir hata vermedi ancak kodları çalıştırması çok uzun sürdü. Yani makroyu çalıştır dediğimde 3-4 dakika rahat bekledim. Daha hızlı çalışması mümkün mü? Eklediğim kodların doğrusu nasıl olması lazımdı?
Dosyayı tekrar paylaşmadım çünkü forum linki üzerinde mevcut. Ayrıca kodlarda orada mevcut bir daha paylaşmam gerekirse paylaşabilirim.
Şimdiden yardımlarınız için teşekkür ederim.
