Dùng VBA để dự đoán LOTTO

Liên hệ QC

taimeanh

Thành viên mới
Tham gia
31/3/09
Bài viết
21
Được thích
32
Cách đây 5 năm do có nhu cầu cần một vài công thức để lập sổ tính toán nên biết đến trang GPE. Từ đó tới nay tôi là thành viên của GPE, tôi chưa có một bài viết nào vì không có chuyên môn về Excel. Tôi thường xuyên vào trang này để đọc. Tôi đọc say xưa hàng trăm lần những bài của các bạn như: ndu96081631, Siwtom, ptm0412, SA_DQ, Hoàng Trọng Nghĩa, levanduyet, PhanTuHuong, Nguyễn Duy Tuân, Hai Lúa Miền Tây, v.v…
Đúng là bể học mêng mông, càng đọc tôi càng say mê. Từ chỗ mù tịt về Excel, VBA nay tự nhận đã được xóa mù về món này. Qua đó xin cảm ơn tập thể GPE đã tạo nên một sân chơi vô cùng bổ ích.
Tôi đã về hưu nên học cũng chẳng để làm gì , tuy vậy tôi vẫn ham học hỏi. Nói đến Excel là nói đến các con số, mà tôi thì về hưu chả có liên quan gì đến sổ sách. Muốn thực hành phải có số liệu, thôi thì nghĩ đủ mọi trò nhưng nó vẫn nhàm chán, cuối cùng tôi nghĩ rằng xổ số nhà nước ngày nào cũng quay, nên có nhiều dữ liệu. Vậy là tôi bắt chước các trang về xổ số thử tính toán bằng Excel, thôi thì đủ trò, từ thống kê, xác suất, rồi thì số nóng, số nguội, bảng, biểu, thấy cũng nhiều điều kỳ thú, nay tôi đưa lên một ví dụ để các bạn góp ý và bổ sung cách làm hay. Tôi tự thấy Code tôi viết còn lủng củng, chạy lâu, chưa vận dụng được các Hàm cho hiệu quả, vì kiến thức hạn chế do không có cơ bản, cóp nhặt . . .
 

File đính kèm

  • Cầu Lotto bằng Excel.rar
    76 KB · Đọc: 1,340
Trong vòng 200 ngày, nhưng kết quả trả về hiện tại lâu nhất ! Cảm ơn bác quan tâm!
"Trả về hiện tại lâu nhất"? Chắc bạn biết tổng cộng số lượng các vị trí kết hợp với nhau là hơn 11000(Mười một nghìn), trong đó các tổ hợp xuất hiện nhiều ít khác nhau trong phạm vi 200 ngày. "Hiện tại lâu nhất" mà bạn nêu trên là của tổ hợp nhiều hay tổ hợp xuất hiện ít vậy?
 
Upvote 0
Không vị trí lâu nhất hiện tại chưa về, trong hơn 11.000 cầu đó!
 
Upvote 0
Cái file đó chỉ dùng để thống kê, trên mạng đã có rất nhiều, nên mới nói là không nên dùng.
Viết code là theo cách tính từng người, tôi không tham gia trò chơi này nên chịu.
Cám ơn bạn đã có ý kiến đóng góp. Bạn cho mình làm phiền chút nhe ..... Mình có file thống kê (có đính kèm bên dưới) xổ số miền bắc theo cách tính của bà chị. Nhưng file này nó bị lỗi, mong bạn chỉnh sửa lại dùm mình.... cảm ơn bạn rất nhiều.
Do file nặng quá nên mình không tải lên dược. Bạn HungQuoc49 cho mình địa chỉ mail nhe.... mình gửi qua
 
Lần chỉnh sửa cuối:
Upvote 0
Cầu Lô Trượt

Em đề nghị các bác giúp em!, ai biết về VBA xin giúp sửa code của bác taimeanh thành cầu lô tô lâu nhất chưa về! Xin cảm ơn và hậu tạ! Chứ em mò mấy ngày nay nhưng chẳng hiểu gì cả!
Nếu bạn muốn tìm cầu lô lâu nhất chưa về, rất đơn giản bạn chỉ cần thay đổi một chút nhỏ ở code là xong. Thay vì nếu ở hai vị trí ghép với nhau có xuất hiện con lô của ngày hôm sau thì nay ngược lại là: hai vị trí ghép lại với nhau nhưng không ra con lô của hôm sau. Mà bạn cần gì những 200 ngày. Vì cầu lô dài nhất không ra chỉ vào tầm trên 50 ngày. Còn TB khoảng trên dưới 40 ngày.
Do tôi bận quá nên ít ol được. Nếu bạn nào có nhu cầu tất cả các hình thức về Lotto, từ TK, soi cầu các kiểu cứ nêu yêu cầu gửi vào huongviet.corp@gmail.com tôi sẽ đáp ứng. Nếu muốn ngay, bạn nhắn: đã gởi mail vào số đt 0922232379.
 
Lần chỉnh sửa cuối:
Upvote 0
Chào bác taimeanh
Bác có viết được code bôi đỏ cầu lotto được không ạ? /-*+/
 
Upvote 0
Nhờ các Bác giúp đỡ, xem giúp em. (bác taimeanh, xem giúp em nhé). Cảm ơn các bác.
 

File đính kèm

  • giaiphapexcel1.xls
    23.5 KB · Đọc: 110
Upvote 0
Như các Bạn biết, giải đặc biệt có 5 chữ số, giờ muốn tính số lượng các số:
- Có 2 số trùng nhau, ví dụ: 11586
- Có 2 cặp số trùng nhau, ví dụ: 12266
- Có 3 số trùng nhau, ví dụ: 58886
thì phải dùng công thức như thế nào ạ?
 
Upvote 0
Như các Bạn biết, giải đặc biệt có 5 chữ số, giờ muốn tính số lượng các số:
- Có 2 số trùng nhau, ví dụ: 11586
- Có 2 cặp số trùng nhau, ví dụ: 12266
- Có 3 số trùng nhau, ví dụ: 58886
thì phải dùng công thức như thế nào ạ?

Tùy điều kiện, với số liệu lớn chắc phải dùng vba
 
Upvote 0
Cái này em chỉ đoán là có thể dựa vào kiến thức về Tổ hợp, nhị thức gì đó. Vì em không giỏi toán nên đưa lên đây nhờ Bạn nào biết thì chỉ giúp.
 
Upvote 0
cái này chỉ là tìm số trùng lặp. gửi file lên đi bạn

Em chưa làm gì được nên chưa có file, chỉ biết đặt câu hỏi như trên:
Như các Bạn biết, giải đặc biệt có 5 chữ số, giờ muốn tính số lượng các số:
- Có 2 số trùng nhau, ví dụ: 11586
- Có 2 cặp số trùng nhau, ví dụ: 12266
- Có 3 số trùng nhau, ví dụ: 58886
thì phải dùng công thức như thế nào ạ?
Em gửi File kèm theo là 1 dạng bài có thể tương tự, file này là tìm số lượng nhóm 5, 10 hoặc 30 số khác nhau trong 100 số (từ 00 - 99).
 

File đính kèm

  • GPE_To hop.xlsx
    9.6 KB · Đọc: 99
Upvote 0
Em chưa làm gì được nên chưa có file, chỉ biết đặt câu hỏi như trên:
Như các Bạn biết, giải đặc biệt có 5 chữ số, giờ muốn tính số lượng các số:
- Có 2 số trùng nhau, ví dụ: 11586
- Có 2 cặp số trùng nhau, ví dụ: 12266
- Có 3 số trùng nhau, ví dụ: 58886
thì phải dùng công thức như thế nào ạ?
Em gửi File kèm theo là 1 dạng bài có thể tương tự, file này là tìm số lượng nhóm 5, 10 hoặc 30 số khác nhau trong 100 số (từ 00 - 99).

Em up file lên đậy ạ, mong mọi người giúp cho công thức để lọc ra các số:
- Có 2 số trùng nhau, ví dụ: 11586, 15186,511,86,58161,...
- Có 2 cặp số trùng nhau, ví dụ: 12266,21266,22166,12626,...
- Có 3 số trùng nhau, ví dụ: 58886, 85886,85688,...
Cám ơn mọi người.
 

File đính kèm

  • GPE_Thong ke DB.xlsx
    822.1 KB · Đọc: 132
Upvote 0
Em up file lên đậy ạ, mong mọi người giúp cho công thức để lọc ra các số:
- Có 2 số trùng nhau, ví dụ: 11586, 15186,511,86,58161,...
- Có 2 cặp số trùng nhau, ví dụ: 12266,21266,22166,12626,...
- Có 3 số trùng nhau, ví dụ: 58886, 85886,85688,...
Cám ơn mọi người.

Nhập đủ số liệu vào cột A rồi nhấn "TÌM"
( Phải nhập đủ cả 5 ký tự cho từng ô, kể cả số 0 đứng đầu )
Nếu 100000 số sẽ phải chờ khoảng 5s ( với core i3 )
 

File đính kèm

  • GPE_Thong ke DB.xlsm
    27.2 KB · Đọc: 145
Upvote 0
Thân gửi bạn lovereturn có địa chỉ lengocthang1410@gmail.com. Mục đích khi mở Topic này là tôi muốn mọi người trao đổi, học tập lẫn nhau. Khi bạn cũng như rất nhiều bạn khác đặt ra yêu cầu, tôi đã làm và gửi cho các bạn. Tôi muốn lần gửi file đó sẽ tạo thành cái sườn để các bạn tham khảo, phát huy, tự mày mò phát triển ý tưởng của mình. Có khó khăn gì thì đưa lên để thảo luận cách làm hay. Chứ như bạn yêu cầu tôi lần hai thì nghĩa là tôi làm toàn bộ cho bạn. Tất cả các yêu cầu mới của bạn, nói thật tôi chỉ làm trong ít phút, nhưng tôi muốn bạn tự làm đi, rồi vướng mắc gì bạn đưa lên, tôi và các bạn trong diễn đàn sẽ góp ý ngay. Nhiều bạn có những yêu cầu, ý tưởng rất lắt léo, phức tạp, khó diễn đạt thì đều gặp trực tiếp tôi và cùng làm, tất cả đều có kết quả rất tốt. Vài ý như vậy mong bạn hiểu.
Thân
 
Upvote 0
Thân gửi bạn lovereturn có địa chỉ lengocthang1410@gmail.com. Mục đích khi mở Topic này là tôi muốn mọi người trao đổi, học tập lẫn nhau. Khi bạn cũng như rất nhiều bạn khác đặt ra yêu cầu, tôi đã làm và gửi cho các bạn. Tôi muốn lần gửi file đó sẽ tạo thành cái sườn để các bạn tham khảo, phát huy, tự mày mò phát triển ý tưởng của mình. Có khó khăn gì thì đưa lên để thảo luận cách làm hay. Chứ như bạn yêu cầu tôi lần hai thì nghĩa là tôi làm toàn bộ cho bạn. Tất cả các yêu cầu mới của bạn, nói thật tôi chỉ làm trong ít phút, nhưng tôi muốn bạn tự làm đi, rồi vướng mắc gì bạn đưa lên, tôi và các bạn trong diễn đàn sẽ góp ý ngay. Nhiều bạn có những yêu cầu, ý tưởng rất lắt léo, phức tạp, khó diễn đạt thì đều gặp trực tiếp tôi và cùng làm, tất cả đều có kết quả rất tốt. Vài ý như vậy mong bạn hiểu.
Thân

em cảm ơn anh, em rất muốn học nhưng chưa biết học từ đâu, những bước đi đầu tiên, chập chững chưa biết đọc ở sách nào, tìm tài liệu ở đâu, mong anh và mọi người giúp em, chỉ bảo em cần phải đọc gì, học gì, và từ quyển nào ạ? em cảm ơn
 
Upvote 0
Upvote 0
Tặng các bạn yêu thích Lotto phấn TK giải đặc biệt. Nó có tác dụng rất tốt khi quyết định đầu tư và ngồi rình cơ hội.
 

File đính kèm

  • TK GĐB.rar
    106.3 KB · Đọc: 292
Upvote 0
Không dùng rồi. Bác cho pass đi
 
Upvote 0
Web KT
Back
Top Bottom