süze degişken atamak

[burhanbeyaz]

ekteki dosyada problemini yazmaya çalıştım.
yardımcı olsanız sevinirim.
Saygılarımla,
B.BEYAZ

 

[uzmanamele]

merhaba

bu işinizi görür mü?
I2 hücrede çapları veri doğrulama listesinden alarak;

Criteria1:=Range("I2").Value

 

[burhanbeyaz]

şef I2 hücresine 12 yazdığımda süzme islemini yapıyor.
ançak d sütüundaki 10,12,14,16 ayrı ayrı yapmasını istiyorum.
başka 1 demir metrajında v.basiç ile çözdüm ama. burada yapmak istiyorum.

 

[uzmanamele]

merhaba

şöyle bişey olur mu:

on error resume next
for i=8 to 26 step 2
Criteria1:=i
'yeni sayfaya kopyalayacak kodlar
next i

bu şekilde tek bir makro ile tüm çaplara göre ayrı sayfada toplam alabilirsiniz.

 

[burhanbeyaz]

deneyecegim.
Pazartesi görüşmek üzere
iyi tatiller
teşekürler.
B.BEYAZ

 

[ismet_d]

SÜZ

Şu Günlerde süzle ilgili konulara takılmış durumdayım

O yüzden size bu konuda yardımcı olmadan geçemedim.

Kolay gelsin

İsmet