52、股票交易模拟与资本预算应用的 VBA 实现

股票交易模拟与资本预算应用的 VBA 实现

1. 股票交易模拟应用

股票交易模拟应用主要展示了如何使用 VBA 运行电子表格模拟模型。
- 基本流程
1. 在模型工作表中开发包含随机函数的电子表格模拟模型。
2. 使用 For 循环复制模型，在循环内调用 Application 对象的 Calculate 方法，强制使用新的随机数重新计算。
3. 在复制工作表中记录选定的输出，并在模拟结束时进行汇总。
- 代码示例

Sub ViewChangeInputs()
' This sub runs when the user clicks the "View/change
' inputs" button on the Explanation sheet.
' Unhide and activate the Inputs sheet so that the user
' can view or change them.
With wsInputs
.Visible = True
.Activate
End With
End Sub

• 注意事项 ：由于模拟可能需要一些时间，尤其是对复杂模型进行多次复制时，建议在运行模拟前将 Excel 的计算模式设置为手动，而不是自动。

• 练习题

  1. 验证计算模式的影响