Dự báo lô tô bằng Excel

[dongjangjuno]

Bạn dùng excel x64?
---
...

đúng r bác, mình dùng excel x64 win cũng x64, chay file x64 của bác r mà vẫn bì vậy

 

[CHAOQUAY]

đúng r bác, mình dùng excel x64 win cũng x64, chay file x64 của bác r mà vẫn bì vậy

'Declare Function chonlocD Lib "GAMathFunctions.dll" (ByRef bangKetQua As Long, ByVal SlD As Long) As Variant
Declare PtrSafe Function chonlocD Lib "GAMathFunctions.dll" (ByRef bangKetQua As Long, ByVal SlD As Long) As Variant

Bạn thử thay câu lệnh trên = dưới xem sao. Hiện tại chỉ có excel 32bit nên đành tạm vậy, nếu không được sẽ hiệu chỉnh sau.
---

Nhân tiện đính kèm file tham khảo gần đây nhất.
Các bác nào sử dụng cần cân nhắc cẩn thận vì đây chỉ là thử nghiệm giải thuật.

 

[hienhien3110]

Máy em bị dính lỗi như hình, anh giúp em với. Em cảm ơn!

 

[CHAOQUAY]

Máy em bị dính lỗi như hình, anh giúp em với. Em cảm ơn!

Bạn cũng dùng excel x64?

 

[hienhien3110]

Bạn cũng dùng excel x64?

Vâng anh, Em sử dụng cách như #15 đã được rồi anh. Em cảm ơn Anh hỗ trợ, anh có File cập nhật KQXS tính đến nay luôn k anh.

 

[CHAOQUAY]

Vâng anh, Em sử dụng cách như #15 đã được rồi anh. Em cảm ơn Anh hỗ trợ, anh có File cập nhật KQXS tính đến nay luôn k anh.

Bạn vào theo đường dẫn bên dưới xem sao
Tải kết quả xổ số miền Bắc về Excel | Giải Pháp Excel (giaiphapexcel.com)

 

[hienhien3110]

Bạn vào theo đường dẫn bên dưới xem sao
Tải kết quả xổ số miền Bắc về Excel | Giải Pháp Excel (giaiphapexcel.com)

Vâng anh, File kết quả chạy ok rồi anh. Mà sao em copy dữ liệu qua File tính thì lại báo lỗi như ảnh, nhờ Anh xem qua giúp em với. Em xin cảm ơn!

 

[CHAOQUAY]

Vâng anh, File kết quả chạy ok rồi anh. Mà sao em copy dữ liệu qua File tính thì lại báo lỗi như ảnh, nhờ Anh xem qua giúp em với. Em xin cảm ơn!

Bạn gửi file lỗi lên cho dễ kiểm tra

 

[hienhien3110]

Bạn gửi file lỗi lên cho dễ kiểm tra

Vâng anh, em gửi File đã cập nhật kết quả ngày 27/12. Nhờ Anh xem qua giúp em, em cảm ơn Anh!

 

[CHAOQUAY]

Vâng anh, em gửi File đã cập nhật kết quả ngày 27/12. Nhờ Anh xem qua giúp em, em cảm ơn Anh!

Lỗi này do cột B có định dạng là text. Sửa như trong file là bình thường trở lại.
Số liệu bị nhập trùng 2 lần, lỗi bôi màu đỏ trong sheet "Loi"

 

[ninjatcb]

Cái này quan trọng là thuật toán để dự đoán của bác thế nào. Bác có thể chia sẻ cách mà bác dự đoán số cắn cứ vào đâu được không ạ ?

 

[hienhien3110]

Lỗi này do cột B có định dạng là text. Sửa như trong file là bình thường trở lại.
Số liệu bị nhập trùng 2 lần, lỗi bôi màu đỏ trong sheet "Loi"

Chào Anh, File em cập nhật thêm dữ liệu ngày mới vào, bấm chọn lọc là văng hết Excel ngay. Nhờ Anh xem giúp em lỗi gì hay máy tính k chạy nỗi, em cảm ơn Anh!

 

[CHAOQUAY]

Chào Anh, File em cập nhật thêm dữ liệu ngày mới vào, bấm chọn lọc là văng hết Excel ngay. Nhờ Anh xem giúp em lỗi gì hay máy tính k chạy nỗi, em cảm ơn Anh!

Cái này có lẽ là do excel 64bit, không phải do dữ liệu hoặc máy tính.
Để 1, 2 ngày nữa rảnh sẽ hiệu chỉnh lại file cho bản x64

 

[hongquan85army]

File dưới đây dùng cho kết quả xổ số miền Bắc.
Kết quả chốt số sẽ dùng cho nhiều nhất là 3 ngày. Về sớm ngày nào, kết thúc lần chơi đó & bắt đầu lần chơi mới.
Có thể dùng để chơi lô tô 2 cặp số, 3 cặp số của nhà nước ban hành và tất nhiên là cũng có thể dùng vào đâu cũng được.
---
File này chỉ mang tính chất tham khảo để thử nghiệm giải thuật, các bác nào có đem vào vận dụng thực tế có lẽ nên cân nhắc cẩn thận trước khi dùng.

---
Cập nhật lại file tăng tốc độ tính.
Bổ sung x64 .dll

Chào bạn, tải file bạn về làm như hướng dẫn nhưng báo lỗi như này là sao vậy

 

[zxxzzxxz]

update kết quả hàng ngày vào làm sao hả bác quẩy ? ! với em có thắc mắc là sao bộ bác lại chia làm 8 , tưởng là 10 bộ số ?

 

[CHAOQUAY]

update kết quả hàng ngày vào làm sao hả bác quẩy ? ! với em có thắc mắc là sao bộ bác lại chia làm 8 , tưởng là 10 bộ số ?

update kết quả làm tay thôi bạn, dùng số liệu của file theo đường dẫn dưới

Tải kết quả xổ số miền Bắc về Excel

Bác @CHAOQUAY bác có thể sửa định dạng cột A và cột B theo như hình được không ạ Bạn lấy đoạn code dưới đây thay thongkeTheodong Sub thongkeTheodong_() Dim Nguon Dim Kq() As String Dim d, m, y Dim i, j, k, x, z, t If Sheet1.Range("A2") = "" Then MsgBox "chua co du lieu nguon" Exit Sub...

www.giaiphapexcel.com

Cái này là theo cặp, không theo bộ. Có lẽ là tính cách nào cũng thế cả thôi

 

[zxxzzxxz]

cái này của bác quẩy lỗi quoài . lúc thì báo gamathfuntion ko có,lúc lại bị tắt luôn cả excel

 

[zxxzzxxz]

bác quẩy dự đoán theo thứ trong tuần ah .

 

[CHAOQUAY]

bác quẩy dự đoán theo thứ trong tuần ah .

Đoán hay thế bạn