Kombinasyon sonucunu sayfalara yazdırabilirmiyiz

[cahill]

selamlar..
ortada gordugum yardımlasmayı gorunce sızden bı yardım almak ıstıyorum arkadaslar..
nerdeyse aglamama sebep olan bı sorun
kombınasyon, excel ve program cahılı oldugum ıcın sızlerden yardımlarınızı beklıorum..
sorum su: spor toto...
15 mac ve 3 ıhtımal..
oyle bı sema, tablo vs. olsunkı oynanacak her kuponu gormemı saglasın.
sanırım 25 30bın cıvarı bı kupona karsılık gelıyor bu sonuc..
yardımlarınızı bekler ılgınız ıcın tesekkur ederım
saygılarımla...

 

[oob1979]

Merhaba,

Foruma yeni üye oldum, bu konularda çok yetersiz olduğum için size bir şey sormak istiyorum.

45 sayı ile 10'lu gruplar oluşturulacak. 45 sayı içersinde 13 tanesini bilirsem 10'lu gruplar içersinde 8 tanesini bulma ihtimalimi için kombinasyon listesi oluşturma ihtimalimiz nedir? Yardımlarınız için şimdiden teşekkürler.

 

[gencoglu27]

Merhaba arkadaşlar,
Değli Haluk arkadaşın yazdığı "lotoo koombinasyonlaı" ilgili kodu offis-2007 de denedim.. fakat aşağıda renkli olarak gösterilen satır hata veriyor.. sorunu nasıl çözeriz ?
teşekkürler

Private Sub CommandButton1_Click()
Dim MyCombin As Integer
Application.VBE.MainWindow.Visible = False
Application.DisplayAlerts = False
For i = Sheets.Count To 1 Step -1
If Sheets(i).Name <> "Data" Then Sheets(i).Delete
Next
Application.DisplayAlerts = True
For Each MyMod In ThisWorkbook.VBProject.VBComponents
If MyMod.Name = "ModCombin" Then
ThisWorkbook.VBProject.VBComponents.Remove MyMod
End If
Next
MyCombin = Application.InputBox("Kaçlı kombinasyon istiyorsunuz ?", "Kullanıcının dikkatine!")
If MyCombin > 0 Then
Call PrepareCode(MyCombin)
End If
End Sub

Tamam.. arkadaşlar sorun çözüldü.. 2007 ofis makro ayarlarında güvenlği değiştirdimm düzeldii.. Teşekkürler..

 

[gencoglu27]

Merhaba Arkadaşlar,
2007 makro ayarları ile oynadım şimdi çalışiyor..15 saniyede bir sayfa yazıyor. toplam 604 sayfa olacağını söylüyor arkadaşlar..bu durumda 2 buçuk saat sürer bitmesi .. ben 100 sayfada işlemi durdurup kaydetmek istedim fakat .."kaydet" aktif değil.. çalışmayı durduramadım..Bu durumda sanırım parça parça indirmek lazım...Yani önce 1-5 aralıktaki sayılar la başlayanı... sonra 6-10 arası gibi ..Buna benzer çalışması olan arkadaş var mı ? Yada başka fikri
teşekkür

 

[rambo34]

Selamlar,
bn 2. sayfadaki Dosya Türü: zip CombinationR2.zip dosyasını indirdim fakat çalıştıramadım nasıl çalıştırabilirim?

 

[Korhan Ayhan]

Merhaba,

Eğer makro güvenlik düzeyiniz yüksekse çalışmaması normaldir.

Araçlar-Makro-Güvenlik menüsünden güvenlik düzeyini orta olarak ayarlayın.
Yine aynı pencerenin ikinci sekmesindeki "Visual Basic Project erişimine güven" seçeneğini işaretleyin. Daha sonra makroları çalıştırmayı deneyin.

 

[demirtas]

Merhaba,

Haluk Bey'in ilk sayfadaki CombinationsR2.zip çözümünün aradan 5 yıl geçtikten sonra bile işime yaradığını bilmek güzel..

Kalıcı olmak böyle bişi sanırım..

Teşekkürler

 

[genckalemsor]

ben sayısal loto için denedim de bunu bana lazım olan birşey daha var.20 sayının 6lı kombinasyonu çok fazla, bunu 4 garanti ya da 5 garanti olacak şekilde ayarlayabilir miyiz? sistemli oynamayı düşünüyorum.
yardımcı olursanız çok sevinicem.

 

[sengent]

Merhabalar,

Dosya eror veriyor,versiyondan kaynaklı olabilirmi ?

düzeltme: güvenlik kısmını es geçmişim düzeltince oluyormuş

 

[abdullahozturk1981]

Sizden rica etsem 3-19-45-53-66-14-21-47-24-27-35-60-74-76-77-57-8-11-20-26-28-30-46-48-54-58-78-18-31-37-39-40-31-56-57-71-75-2-16-32-59-62-63-65-67-68 bu sayıları 10 'lu gruplar halinde benzersiz kombinasyon yapabilirmisiniz. Excellini gönderirseniz çok makbule geçer

 

[Necdet]

Sizden rica etsem 3-19-45-53-66-14-21-47-24-27-35-60-74-76-77-57-8-11-20-26-28-30-46-48-54-58-78-18-31-37-39-40-31-56-57-71-75-2-16-32-59-62-63-65-67-68 bu sayıları 10 'lu gruplar halinde benzersiz kombinasyon yapabilirmisiniz. Excellini gönderirseniz çok makbule geçer

Sayabildiğime göre 46 sayıya göre 10 lu kombinasyon istiyorsunuz.

Bunun sonucunu oynamayı mı düşünüyorsunuz?

Zira 4.076.350.421 kolon ediyorda, o yüzden sordum

 

[EAGLE1903]

teşekkürler

 

[ykaya78]

ben sayısal loto için denedim de bunu bana lazım olan birşey daha var.20 sayının 6lı kombinasyonu çok fazla, bunu 4 garanti ya da 5 garanti olacak şekilde ayarlayabilir miyiz? sistemli oynamayı düşünüyorum.
yardımcı olursanız çok sevinicem.

20 sayıda 6 bil 5 garanti 1040 kolon
20 sayıda 5 bil 5 garanti 3231 kolon
20 sayıda 4 bil 4 garanti 487 kolon
20 sayıda 4 bil 3 garanti 38 kolon
20 sayıda 3 bil 3 garanti 90 kolon

 

[maximkosecki]

5 farklı gruptan 6lı kombinasyon oluşturmak istiyorum.
mesela
1-2-3-4-5-6 bu gruptan 1 sayı
1-2-3-4-5-6-7-8 bu gruptan 1 sayı
1-2-3-4 bu gruptan 1 sayı
1-2-3-4-5 bu gruptan 1 sayı
1-2-3-4-5-6 bu gruptan 2 sayı

seçerek 6 lı kombinasyonlar nasıl oluşturulur? yardımlarınızı bekliyorum. teşekkürler

 

[bulut57]

Arkadaşlar benim office 2003 ben nasıl yapıcam.

 

[sheros]

Merhaba arkadaşlar.
Sizden rica etsem 1 den 54 de kadar 10 'lu gruplar halinde kombinasyon yapabilirmisiniz her bir sayı 13 defa tekrarlansı, ortalama 70 veya 71 tane 10 lu grup olacak. Excellde gönderirseniz çok makbule geçer.
Şimdiden teşekkür eder iyi forumlar dilerim

 

[bekir38]

20 sayıda 6 bil 5 garanti 1040 kolon
20 sayıda 5 bil 5 garanti 3231 kolon
20 sayıda 4 bil 4 garanti 487 kolon
20 sayıda 4 bil 3 garanti 38 kolon
20 sayıda 3 bil 3 garanti 90 kolon

bunların otomatik olarak yapılanları mümkün mü?
yani ;
örnek sayıları biz seçiyoruz, 1 den 50 ye kadar aralıkta 20 sayı,
bu sayılar içinden 10 tanesi gelirse 4 garanti olacak şekilde kombinasyon yapsın şeklinde bir çalışma varmıdır?

 

[ayodya]

1'den 49'a kadar olan sayıların 6'lı kombinasyonlarını excel 2003 kullanarak yazdırabiliyorum. Ancak istediğim bazı ayrıntılar var ki, beceremiyorum. Yardımınıza talibim. Isteklerim şunlar:
A) 6'lı küme içinde ardışık en fazla 3 sayı olmalı.(yani 1,2,3 olabilir ama 1,2,3,4 ya da 8,9,10,11,12 gibi üçten fazla sayı ard arda olmamalı)
b) 6'lı kümeyi oluşturan sayıların altısı da tek sayı ya da altısı da çift sayı olmamalı.
C) 6'lı kümeyi oluşturan sayıların 5'i tek sayı, ya da 5'i çift sayı olmamalı.
D) 6'lı kümeyi oluşturan sayıların hepsi tek basamaklı ya da hepsi 2, 3, 4 ile başlayan iki basamaklı sayı olmamalı.
Istediğim sonucu alacağım programı nasıl yazabileceğim konusunu öğretirseniz mutlu olurum. Yazılım konusu bana heyecan veriyor ama bilgisizlik yüzünden beceremiyorum. 49 sayıdan 6'lı kümeleri nasıl oluşturabileceğimi düşünebiliyor ama o kümeleri yazmadan önce isteklerime göre kontrol ettirmeyi yapamıyorum. Ilginize şimdiden teşekkür ederim.

 

[Necdet]

1'den 49'a kadar olan sayıların 6'lı kombinasyonlarını excel 2003 kullanarak yazdırabiliyorum. Ancak istediğim bazı ayrıntılar var ki, beceremiyorum. Yardımınıza talibim. Isteklerim şunlar:
A) 6'lı küme içinde ardışık en fazla 3 sayı olmalı.(yani 1,2,3 olabilir ama 1,2,3,4 ya da 8,9,10,11,12 gibi üçten fazla sayı ard arda olmamalı)
b) 6'lı kümeyi oluşturan sayıların altısı da tek sayı ya da altısı da çift sayı olmamalı.
C) 6'lı kümeyi oluşturan sayıların 5'i tek sayı, ya da 5'i çift sayı olmamalı.
D) 6'lı kümeyi oluşturan sayıların hepsi tek basamaklı ya da hepsi 2, 3, 4 ile başlayan iki basamaklı sayı olmamalı.
Istediğim sonucu alacağım programı nasıl yazabileceğim konusunu öğretirseniz mutlu olurum. Yazılım konusu bana heyecan veriyor ama bilgisizlik yüzünden beceremiyorum. 49 sayıdan 6'lı kümeleri nasıl oluşturabileceğimi düşünebiliyor ama o kümeleri yazmadan önce isteklerime göre kontrol ettirmeyi yapamıyorum. Ilginize şimdiden teşekkür ederim.

Merhaba,

Zamanında bu işlerle fazla uğraşmış biri için size önerim : bu işlere hiç bulaşmayın, sonu yok

 

[umut2011]

Merhabalar,
Ben dosyaya baktım ama yapmak istedğim şey ise 10 rakamın 5er li kombinaysonlarını yazdırmak. Ve bir sorum daha var eğer aynı kutucuğun içerisine 1 den fazla eleman yazmak istersem bu bir sıkıntı oluşturur mu ? ( örneğin Ahmet, ayşe ) gibi. Şimdiden yardımı olan herkese çok teşekkür ederim.