Làm thế nào để tạo ra các số xổ số trong excel?
Bạn đã bao giờ nghĩ đến việc tạo ra các số xổ số trong Excel hoặc tự tạo một bộ tạo số xổ số trong Excel chưa? Trong bài viết này, tôi cung cấp ba phương pháp để bạn thực hiện nó một cách dễ dàng.
- Tạo số xổ số bằng các Hàm Excel (5 bước)
- Tạo số xổ số với VBA Macro
- Tạo số xổ số với Kutools cho Excel (2 bước)
Tạo số xổ số bằng các Hàm Excel
Phương pháp này sẽ hướng dẫn bạn cách áp dụng một số hàm Excel để tạo số xổ số. Và bạn có thể làm như sau:
1. Trong một trang tính trống, hãy nhập tiêu đề cột trong Phạm vi A1: C1 như ảnh chụp màn hình dưới đây được hiển thị:
2. Nhập công thức vào Cột A, Cột B và Cột C:
(1) Trong Ô A2, nhập công thức = RAND (), và sau đó kéo chốt điều khiển Điền vào phạm vi A2: A50.
(2) Trong Ô B2, nhập công thức =RANK($A2,$A$2:$A$50)+COUNTIF(B$1:B1,B1)-1, và sau đó kéo Fill Handle đến Phạm vi B2: B50. (Trong công thức, A2 là số ngẫu nhiên còn lại cho ô hiện tại, $ A $ 2: $ A $ 50 là tất cả các số ngẫu nhiên mà chúng tôi nhận được với công thức đầu tiên, B $ 1 là ô đầu tiên trong Cột B và B1 là ô ở trên hiện tại ô).
(3) Trong Phạm vi C2: C50, nhập các số thứ tự từ 1 đến 49.
Sau đó, bạn sẽ nhận được một bảng như ảnh chụp màn hình bên trái hiển thị:
![]() |
Công thức quá phức tạp để nhớ? Lưu công thức dưới dạng mục nhập Văn bản Tự động để sử dụng lại chỉ với một cú nhấp chuột trong tương lai! Đọc thêm ... Dùng thử miễn phí |
3. Tìm một phạm vi trống, nhập số thứ tự theo chiều ngang trong một hàng như ảnh chụp màn hình dưới đây:
4. Bên dưới số thứ tự đầu tiên là 1, hãy nhập công thức = VLOOKUP (G1, $ B $ 1: $ C $ 50,2, FALSE) vào đó và kéo Fill Handle đến Phạm vi bạn cần.
Chú thích: Trong công thức này, G1 là ô có số thứ tự đầu tiên là 1, $ B $ 1: $ C $ 50 là cột Xếp hạng duy nhất và cột Số bóng, 2 có nghĩa là tìm các giá trị trong cột thứ hai của Phạm vi $ B $ 1: $ C $ 50 .
Sau đó, bạn sẽ nhận được các số xổ số như ảnh chụp màn hình dưới đây:
5. Nó là tùy chọn. Để ngăn các số xổ số tự động thay đổi khi trang tính hiện tại làm mới, bạn có thể nhấp vào Công thức > Tùy chọn tính toán > Hướng dẫn sử dụng.
Dễ dàng liệt kê tất cả sự kết hợp của một số chuỗi dữ liệu trong Excel
Kutools cho Excel's Liệt kê tất cả các kết hợp tiện ích được thiết kế để tổng quát tất cả các kết hợp có thể có từ một số chuỗi dữ liệu nhất định và liệt kê các kết hợp này trong một cột như hình minh họa bên dưới.

Kutools cho Excel - Bao gồm hơn 300 công cụ tiện dụng cho Excel. Bản dùng thử miễn phí đầy đủ tính năng 30-ngày, không cần thẻ tín dụng! Get It Now
Tạo số xổ số với VBA Macro
Phương pháp này sẽ hướng dẫn bạn áp dụng macro VBA để tạo số xổ số trong Excel. Vui lòng làm như sau:
1. nhấn Khác + F11 để mở cửa sổ Microsoft Visual Basic for Applications.
2. Nhấp chuột Chèn > Mô-đun để mở một cửa sổ mô-đun mới và dán mã VBA sau vào đó:
VBA: Trình tạo số xổ số trong Excel
Sub LotteyCode()
Dim Rng As Range
Dim WorkRng As Range
Dim xNumbers(49) As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Out put to (single cell):", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.Range("A1")
For xIndex = 1 To 49
xNumbers(xIndex) = xIndex
Next
For xIndex = 1 To 6
xNum = 1 + Application.Round(Rnd * (49 - xIndex), 0)
WorkRng.Offset(0, xIndex - 1).Value = xNumbers(xNum)
xNumbers(xNum) = xNumbers(50 - xIndex)
Next
End Sub
3. Nhấn nút F5 phím hoặc nhấp vào chạy để chạy macro VBA này.
4. Bây giờ trong hộp thoại bật lên, hãy chỉ định một ô để xuất ra các số xổ số và nhấp vào OK .
Sau đó, bạn sẽ thấy 6 số xổ số duy nhất được tạo và hiển thị trong các ô được chỉ định.
Tạo số xổ số với Kutools cho Excel
Nếu bạn đã cài đặt Kutools cho Excel, Chèn dữ liệu ngẫu nhiên tiện ích có thể giúp bạn tạo số xổ số trong Excel cùng một lúc.
Kutools cho Excel - Bao gồm hơn 300 công cụ tiện dụng cho Excel. Bản dùng thử miễn phí đầy đủ tính năng 30-ngày, không cần thẻ tín dụng! Dùng thử miễn phí ngay!
1. Chọn 6 ô liền kề, chẳng hạn như A1: F1, sau đó bấm vào Kutools > Chèn > Chèn dữ liệu ngẫu nhiên.
2. Bây giờ hộp thoại Chèn Dữ liệu Ngẫu nhiên xuất hiện. Đi đến Số nguyên tab, loại 1 in Từ loại hộp 49 in Đến hộp, kiểm tra Giá trị duy nhất và nhấp vào OK cái nút. Bây giờ bạn sẽ thấy 6 số xổ số duy nhất được tạo và hiển thị trong các ô đã chọn ngay lập tức.
Kutools cho Excel - Bao gồm hơn 300 công cụ tiện dụng cho Excel. Bản dùng thử miễn phí đầy đủ tính năng 30-ngày, không cần thẻ tín dụng! Get It Now
Demo: tạo số xổ số với Kutools cho Excel
Các bài liên quan:
Các công cụ năng suất văn phòng tốt nhất
Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng 80% năng suất của bạn
- Tái sử dụng: Chèn nhanh công thức phức tạp, biểu đồ và bất cứ thứ gì bạn đã sử dụng trước đây; Mã hóa ô với mật khẩu; Tạo danh sách gửi thư và gửi email ...
- Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
- Hợp nhất các ô / hàng / cột mà không làm mất dữ liệu; Nội dung phân chia ô; Kết hợp các hàng / cột trùng lặp... Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
- Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên ...
- Bản sao chính xác Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tham khảo sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa ...
- Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa không gian; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
- Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt bằng cách in đậm, in nghiêng ...
- Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
- Hơn 300 tính năng mạnh mẽ. Hỗ trợ Office / Excel 2007-2021 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ tính năng Dùng thử miễn phí 30 ngày. Bảo đảm hoàn lại tiền trong 60 ngày.

Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều
- Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
- Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
- Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!















