Kombinasyon sonucunu sayfalara yazdırabilirmiyiz

[Korhan Ayhan]

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

 

[death_knight]

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

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.

 

[baydeniro]

Selamlar,

Ekteki örnek dosyayı incelermisiniz.

Sayın Korhan Ayhan, çok çok teşekkür ederim. Çok güzel bir çalışma. Ellerinize sağlık

 

[deniar]

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.

 

[vdtck]

Haluk beyin ismini silmemekle iyi yapmışsınız iyi bir çalışma her zaman emeğe saygı

 

[muhacir58]

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

 

[muhacir58]

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?

 

[cerselog]

Selamlar,

Ekteki örnek dosyayı incelermisiniz.

korhanbey yukarıdaki dosyayı çalıştırdığımda resimdeki gibi bir hata mesajı veriyor. yardımcı olursanız çok sevinirim kolay gelsin

 

[ottoman71]

korhanbey yukarıdaki dosyayı çalıştırdığımda resimdeki gibi bir hata mesajı veriyor. yardımcı olursanız çok sevinirim kolay gelsinEkli dosyayı görüntüle 110903

Makro Güvenliği\VBA projesi nesne modeli erişimine güven
Seçeneğini işaretleyiniz.

 

[ottoman71]

Haluk Hocam ve Korhan Hocam;
Aşağıda linkte belirttiğim konu için bana yardımcı olabilir misiniz?
Listede belirtilen kesim boyları için, U2 hücresindeki ham madde boyuna en yakın toplamlar için bir kombinasyon oluşturulması mümkün müdür?

http://www.excel.web.tr/f48/e-le-tirme-yapma-t100108.html

 

[Korhan Ayhan]

Selamlar,

Sn. cerselog,

İlk önce "Kombinasyonları Listele" butonuna basın. İşlem bitince ikinci butona basın. O zaman hata mesajı almazsınız.

korhanbey yukarıdaki dosyayı çalıştırdığımda resimdeki gibi bir hata mesajı veriyor. yardımcı olursanız çok sevinirim kolay gelsinEkli dosyayı görüntüle 110903

 

[cerselog]

öyle yapıyorum ama genede hata veriyor

 

[Korhan Ayhan]

Selamlar,

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

 

[cerselog]

sizin dosyanızı hiç değiştirmiyorum Ekli dosyayı görüntüle Kombinasyonları Listelemek.rar

 

[cerselog]

sizin dosyanızı hiç değiştirmiyorum Ekli dosyayı görüntüle 110990

Yanlız koray bey bi şeyi söylemeyi unuttum size ofis 2003 ile 2007 olması fark edermi? 2007 yi yeni yeni kullanmaya başladım nasıl bir düzenleme yapabilirim

 

[Korhan Ayhan]

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.

 

[cerselog]

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.

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.

 

[Korhan Ayhan]

Selamlar,

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

    EN_YAKIN_1 = [COLOR=red]Application.[/COLOR]Evaluate("=MAX(IF('1'!B2:IV65536<VERİ!B2,'1'!B2:IV65536))")

 

[ottoman71]

Selamlar,

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

    EN_YAKIN_1 = [COLOR=red]Application.[/COLOR]Evaluate("=MAX(IF('1'!B2:IV65536<VERİ!B2,'1'!B2:IV65536))")

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?

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki linkte 2007 versiyon için yapılması gereken işlemi tarif ettim. İncelermisiniz.

kombinasyonları listelemek en yakın değer hatası