1. 您所在位置：
  2. 网站首页
  3. 文档分类
  4. 办公文档
  5. 办公软件应用

用excel实现随机抽签.docxVIP

  • 1
  • 0
  • 约1.9千字
  • 约 3页
  • 2025-10-23 发布于广西
  • 举报

用excel实现随机抽签.docx

    用excel实现随机抽签

    先看看程序运行情况：将数据复制粘贴进去，点开始开始生成数据，停止产生结果。

    实现代码

    Dimi,j,kAsInteger

    DimFlagAsBoolean

    Dimstr$

    Sub按钮1_Click()

    Flag=False

    IfCells(1,1)=准备就绪Then

    Cells(1,1)=正在生成

    DoUntilFlag

    Calldornd

    DoEvents

    Loop

    EndIf

    EndSub

    Sub

    您可能关注的文档

    最近下载

    文档评论（0）

    1亿VIP精品文档

    更多 >

    相关文档

    更多 >