I want to use excel to make an automatic lottery program (the following is the introduction of the computer newspaper, and I don't know why it failed in my computer)

Press Alt and F 1 1 at the same time to enter the macro interface, click the insert menu and paste the following code:

Boolean Dim flag

Secondary aaa level ()

Dim cells as ranges

Do it until you mark it.

Range ("C6:G 10"). Cell (Int(Rnd() * 25)+1). choose

Multiple activities

ring

Flag = false

End joint

Child bbb ()

Flag = true

End joint

Go back to Excel, enter 25 labels: G 10 (the bold words in the code are modified according to the actual situation), insert two graphics, such as boxes, one with "draw lots" and the other with "pause", right-click the first box and specify the macro, aaa；; Right click the second box and specify the macro bbb.

Do it.