1、打开Excel，在要显示动态变化数字的单元格中设置好格式，如下图所示，要在B2单元格中显示动态数字。
2、点击“开发工具”选项卡中的“Visual Basic”，如下图所示。
3、在打开的VBA编辑界面中，先双击左侧的工作表名，出现右侧空白代码编辑区，输入代码：
Sub 鱼木混猪()
For i = 1 To 20
Range("B2") = Int(Rnd() * 10)
For j = 1 To 1000
DoEvents
Next j
Next i
End Sub
如下图所示。
4、关闭VBA编辑界面，返回Excel中，按下Alt+F8组合键，打开“宏”对话框，如下图所示，此时会默认选择上述的代码，只要点击“执行”即可。
5、此时，就会在B2单元格中动态地显示不断变化的数字，如下图所示。
1、1.打开Excel；
2.点击“开发工具”、“Visual Basic”；
3.输入代码，核心代码：
Range("B2") = Int(Rnd() * 10)
For j = 1 To 1000
DoEvents
Next j
4.按下Alt+F8，点击“执行”；
5.就在Excel单元格中显示动态变化的数字。
