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
ok thích lắm ,em cám ơn ,em thich tính toán như vầy lắm ,em sẽ cố gắng trình bày cho anh...
 
Upvote 0
bác có file tìm chạm đb mà update bằng xsminhngoc không cho mình xin với cám ơn bác trước nha
 
Upvote 0
Nhân đây mình cũng post để mọi người tham khảo file.

- Tự cập nhật KQ từ Ketqua.net
- Tính xem vào ngày XXX (T2-CN) của Y tuần thì cặp nào hay về nhất.
- Tô màu các vị trí về.

Code còn sơ sài mong mọi người góp ý.
Link: https://www.dropbox.com/s/tve4hpih2c1o88v/Lô chơi.xlsm
 
Upvote 0
Upvote 0
Tình cờ vào đây vì cũng có tý máu ăn thua, nhưng vào đây rồi thấy cái nút bấm ở ô AQ - 1,2 hay quá nên e muốn xin code, cách chèn code và cách kích hoạt code. thanks bác nhiều
 
Upvote 0
Nhân đây mình cũng post để mọi người tham khảo file.

- Tự cập nhật KQ từ Ketqua.net
- Tính xem vào ngày XXX (T2-CN) của Y tuần thì cặp nào hay về nhất.
- Tô màu các vị trí về.

Code còn sơ sài mong mọi người góp ý.
Link: https://www.dropbox.com/s/tve4hpih2c1o88v/Lô chơi.xlsm
Sao em không tải được bác nhỉ? bác gửi vào link mediafile coi đi. Thanks bác!
 
Upvote 0
Thống kê thế này thì nhiều web khác đã làm sẵn rồi, nếu có ý tưởng mới hơn có lẽ sẽ được quan tâm nhiều hơn
 
Upvote 0
Hihi
 
Lần chỉnh sửa cuối:
Upvote 0
Các bác rất giỏi, rất mong các bác bày cho em, phương pháp của em là lô nuôi theo cầu nhưng em lại mù tịt vb, rất mong các bác chỉ giáo, em có bảng kèm theo dây, rất mong các bác giúp đỡ!
 

File đính kèm

  • Vi du.xlsx
    675.6 KB · Đọc: 151
Upvote 0
Các bác rất giỏi, rất mong các bác bày cho em, phương pháp của em là lô nuôi theo cầu nhưng em lại mù tịt vb, rất mong các bác chỉ giáo, em có bảng kèm theo dây, rất mong các bác giúp đỡ!

Không hiểu chỗ này: " Max số ngày chưa về của tất cả bảng dữ liệu 106 con số một ngày quay xổ số ".
 
Upvote 0
Mỗi ngày có 27 giải nhưng số gồm 106 con số. Đảo vị trí của 106 số sẽ được 11130 vị trí, ví dụ con đầu tiên của đặc biệt là 5 thì 5 ghép với tất cả các con con lại, và vị trí của con thứ 2 giải đặc biệt là 4 thì cũng ghép với tất cả các con còn lại.
Rất mong được giúp đỡ
 
Upvote 0
Mỗi ngày có 27 giải nhưng số gồm 106 con số. Đảo vị trí của 106 số sẽ được 11130 vị trí, ví dụ con đầu tiên của đặc biệt là 5 thì 5 ghép với tất cả các con con lại, và vị trí của con thứ 2 giải đặc biệt là 4 thì cũng ghép với tất cả các con còn lại.
Rất mong được giúp đỡ
Chỗ này rất dễ lẫn: Số như bạn nói thì chỉ có 100, còn đảo vị trí mới là 11130 như bạn đã nêu. Vậy cụ thể là bạn kiểm tra số hay kiểm tra vị trí đảo?
 
Upvote 0
Chỗ này rất dễ lẫn: Số như bạn nói thì chỉ có 100, còn đảo vị trí mới là 11130 như bạn đã nêu. Vậy cụ thể là bạn kiểm tra số hay kiểm tra vị trí đảo?
Nhầm 107 con số mỗi ngày.
Kiểm tra tất cả vị trí, đảo vị trí nữa (Ví dụ đầu tiên của giải đặc biệt là 5, cuối giải 7 chẳng hạn là con 6, sẽ có 2 vị trí là 56 và vị trí 65) xem vị trí cao nhất là bao nhiêu ngày chưa về.
 
Upvote 0
Không biết xác suất trúng có cao không? Bạn nào đã giàu nên nhờ topic này vào báo tin cho các thành viên khác hồ hởi cùng tham gia với!@$@!^%
 
Upvote 0
Chào các bạn. Lời đầu tiên xin chúc các thành viên trong diễn đàn GPE nhiều sức khỏe.
Mình là thành viên mới nên không biết gởi câu hỏi ở đâu, nên gửi nhờ nơi này.
Mình đang làm một file thống kê xổ số miền bắc có dùng đến VBA, mà mình thì không rành về VBA mong các bạn giúp đỡ. Chân thành cảm ơn.
Ví dụ mình có kết quả xổ số miền bắc ngày 25/7/2014
gđb: 74199
g1: 91082
g2: 71771 - 00036
g3: 74094 - 45535 - 53525 - 08691 - 94960 - 67372
...
g7: 90 - 61 - 40 - 95

==> Mình muốn tạo một nút "Update". Khi mình nhấn vào nút "Update" thì kết quả xổ số miền bắc hàng ngày từ Web (http://www.xosominhngoc.com/xo-so-mien-bac.html hoặc trang nào cũng được) sẽ tự động cập nhật về file Excel. Với các điều kiện sau:
1-Sheets 1, hàng ngang sẽ cho ra kết quả:
25/7/2014 74199 7 4 1 9 9 9 1 0 8 2 7 1 7 7 1 0 0 0 3 6 7 4 0 9 4 4 5 5 3 5 5 3 5 2 5 0 8 6 9 1 9 4 9 6 0 6 7 3 7 2 ....... 9 0 6 1 4 0 9 5
Cứ như vậy, đến ngày 26/7/2014 lúc có kết quả xổ số mình tiếp tục nhấn nút "Update" thì dòng ngày 25/7/2014 vẫn giữ nguyên, dòng tiếp theo sẽ cho kết quả tương tự như ngày 25.
2- Sheets 2, hàng ngang sẽ cho ra kết quả:
25/7/2014 99(2số cuối giải đặc biệt, và tô màu đỏ) 74199 91082 71771 00036 74094 45535 08691 94960 67372 .............. 90 61 40 95. Phía sau cột ô số "95" tạo thêm một cột để ghi "tổng" 2 số cuối của giải đặc biệt, ví dụ: 9+9=18 ghi là 8 (tổng 8); 2+2=4 ghi 4 (tổng 4)

Mong các bạn giúp đỡ, lòng thật cảm ơn.
 
Upvote 0
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 . . .
Khi kiểm tra báo lỗi thế này! Mong bác xem giúp!
baoloi.jpg
Còn thống kê thì lỗi thế này!
untitled.jpg
 
Lần chỉnh sửa cuối:
Upvote 0
Chào các bạn. Lời đầu tiên xin chúc các thành viên trong diễn đàn GPE nhiều sức khỏe.
Mình là thành viên mới nên không biết gởi câu hỏi ở đâu, nên gửi nhờ nơi này.
Mình đang làm một file thống kê xổ số miền bắc có dùng đến VBA, mà mình thì không rành về VBA mong các bạn giúp đỡ. Chân thành cảm ơn.
Ví dụ mình có kết quả xổ số miền bắc ngày 25/7/2014
gđb: 74199
g1: 91082
g2: 71771 - 00036
g3: 74094 - 45535 - 53525 - 08691 - 94960 - 67372
...
g7: 90 - 61 - 40 - 95

==> Mình muốn tạo một nút "Update". Khi mình nhấn vào nút "Update" thì kết quả xổ số miền bắc hàng ngày từ Web (http://www.xosominhngoc.com/xo-so-mien-bac.html hoặc trang nào cũng được) sẽ tự động cập nhật về file Excel. Với các điều kiện sau:
1-Sheets 1, hàng ngang sẽ cho ra kết quả:
25/7/2014 74199 7 4 1 9 9 9 1 0 8 2 7 1 7 7 1 0 0 0 3 6 7 4 0 9 4 4 5 5 3 5 5 3 5 2 5 0 8 6 9 1 9 4 9 6 0 6 7 3 7 2 ....... 9 0 6 1 4 0 9 5
Cứ như vậy, đến ngày 26/7/2014 lúc có kết quả xổ số mình tiếp tục nhấn nút "Update" thì dòng ngày 25/7/2014 vẫn giữ nguyên, dòng tiếp theo sẽ cho kết quả tương tự như ngày 25.
2- Sheets 2, hàng ngang sẽ cho ra kết quả:
25/7/2014 99(2số cuối giải đặc biệt, và tô màu đỏ) 74199 91082 71771 00036 74094 45535 08691 94960 67372 .............. 90 61 40 95. Phía sau cột ô số "95" tạo thêm một cột để ghi "tổng" 2 số cuối của giải đặc biệt, ví dụ: 9+9=18 ghi là 8 (tổng 8); 2+2=4 ghi 4 (tổng 4)

Mong các bạn giúp đỡ, lòng thật cảm ơn
 
Upvote 0
Web KT
Back
Top Bottom