53、财务分析与回归应用的VBA实现

财务分析与回归应用的VBA实现

1. 导航代码功能

在应用程序中，为了方便在不同工作表之间进行导航，提供了以下几个子程序，它们分别与模型（Model）、有趣（Interesting）和报告（Report）工作表上的对应按钮相关联。以下是具体的代码：

Sub ViewReport()
    With wsReport
       .Activate
       .Range("A1").Select
    End With
End Sub

Sub ViewModel()
    With wsModel
       .Visible = True
       .Activate
       .Range("A2").Select
    End With
End Sub

Sub ViewInteresting()
    With wsInteresting
       .Visible = True
       .Activate
       .Range("A2").Select
    End With
End Sub

这些子程序的作用分别是：
- ViewReport() ：激活报告工作表，并选中A1单元格。
- ViewModel() ：将模型工作表设置为可见，然后激活该工作表，并选中A2单元格。
- ViewInteresting() ：将有趣工作表设置为可见，然后激活该工作表，并选中A2单元格。

2. 资本预算应用练习