• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Kombinasyon sonucunu sayfalara yazdırabilirmiyiz

Selamlar,

4. seçeneği seçmelisiniz.

Ayrıca aşağıdaki seçeneğide aktif hale getirin.

1. VBA projesi nesne modeli erişimine güven
 
Allah Razı olsun!

Merhabalar. Elinize yüreğinize sağlık. İstatistik ödevimden dolayı o kadar çok işime yaradı ki anlatamam sizlere. İyi ki böyle bir forum var. Çok teşekkürler

Haluk' Alıntı:
Sayın Ali bey, nezaketiniz için teşekkür ederim.

Sayın hassan26; dosyayı istediğiniz şekilde revize ettim. Yani, kombinasyon sonuçları eğer 65536 adetden fazlaysa, gerekli sayfalar otomatik olarak üretilecektir.

Ben, sayısal loto için 49 adet sayının 6'lı kombinasyonu için kodu denedim.

Kod çalışıyor ancak, 15 -16 sayfa ürettikten sonra PC' nin hafızası yeterli gelmediği için kodun çalışması duruyor.

Revize dosya ektedir.
Genişletmek için tıkla ...
 
Değerli üye arkadaşlar bu sitede dile getirilen sorulara yazdığınız yanıtlar ile inan benim gibi vba ve makro acemilerine çok büyük yardımlarınız dokunuyor. Yazdığınız cevaplardan ve üslubunuzdan ötürü hepinize çok teşekkür ederim.
 
Haluk beyin ismini silmemekle iyi yapmışsınız iyi bir çalışma her zaman emeğe saygı
 
selam arkadaşlar... 1 den 36 ya kadar 36 rakamın 6 lı olarak kombinasyonu lazım...ama burda bir ayrıntı önemli aynı sayılar biraraya sadece 1 defa gelecek... bu şöylede olabilir...1den 6 ya bir grup 7-12 bir grup 13-18 bir grup 19-24 25-30 31-36 şeklinde 6 lı 6 grup gruplar arası 6 lı kombinasyonuda mümkün...yardımlarınız için şimdiden teşekkürler
 
4 gündür bekliyorum...buradan bir yardım diye...kendimde uğraşıp duruyorum...çıkamdım içinden...yardımcı olabilecek yok mu arkadaşlar?
 
Selamlar,

Hata aldığınız dosyayı foruma eklermisiniz.
 
Selamlar,

Ben eklediğim dosyayı tekrar test ettim. Herhangi bir problem görünmüyor.

2007 kullanan başka üyelerimiz dosyayı denerse sorunun neden kaynaklandığını çözebiliriz.
 
Korhan Ayhan' Alıntı:
Selamlar,

Ben eklediğim dosyayı tekrar test ettim. Herhangi bir problem görünmüyor.

2007 kullanan başka üyelerimiz dosyayı denerse sorunun neden kaynaklandığını çözebiliriz.
Genişletmek için tıkla ...

ben dosyayı 2003 kullanan başka bi bilgisayarda denedim sıkıntı yok, ancak benim 2007 de hata veriyor,
acaba bendenmi kaynaklanıyor diye başka bi 2007 kullanan makinada denedim, aynı hatayı orda da verdi.
 
Selamlar,

Hata veriyor dediğiniz satırda EVALUATE komutu bulunuyor. Birde hata veren satırı aşağıdaki şekilde değiştirip denermisiniz.

Kod: 
    EN_YAKIN_1 = [COLOR=red]Application.[/COLOR]Evaluate("=MAX(IF('1'!B2:IV65536<VERİ!B2,'1'!B2:IV65536))")
 
Korhan Ayhan' Alıntı:
Selamlar,

Hata veriyor dediğiniz satırda EVALUATE komutu bulunuyor. Birde hata veren satırı aşağıdaki şekilde değiştirip denermisiniz.

Kod: 
    EN_YAKIN_1 = [COLOR=red]Application.[/COLOR]Evaluate("=MAX(IF('1'!B2:IV65536<VERİ!B2,'1'!B2:IV65536))")
Genişletmek için tıkla ...

Korhan Hocam,
Office 2007'de bende denedim aynı hatayı veriyor.Son önerdiğiniz "Application" kodunu ekledikten sonra da aynı hata devam ediyor.
İlk Hata: Method 'Evaluate' of object '_Global' failed
Application'u ekledikten sonraki Hata: Method 'Evaluate' of object '_Application' failed.

Bir de başka bir sorum olacaktı bu konuda.
Dosyadaki örnek değerden gidecek olursak;
"Aranan değeri veren tam ve en yakın kombinasyonlar" butonuna tıkladıktan sonra RAPOR sayfasında, alt alta sonuçları veriyor. (Yani hangi hücrelerin toplamı VERİ sayfası, B2 hücresine eşit veya yakın olacak şekilde)
Bize verilecek toplamlar 95'i geçmemesi gerekiyor.Fakat hücre toplamları olarak ifade edilen sonuçlarda hep A2, A11, A12, A14 hücreleri gözükmekte. Bu hücrelerdeki değerler 95'i geçtiği için hesaplamaması gerekmiyor mu?
 
Cevap yazmak için giriş yap yada kayıt ol.
Geri
Üst