VBA t检验：假设方差不相等的两个样本

如何在VBA t测试中编码：假设不相等方差的两个样本？这是我到目前为止所拥有的。当我运行它时，一个窗口显示“对不起，我们找不到C:\Users\Jacob\Documents\ATPVBAEN.XLAM。它可能被移动、重命名或删除了吗？”

---

不要使用

Application.Run

，而是在项目中添加对

atvbaen.vbs

的引用（使用VBA编辑器中的

Tools/References

），执行此操作后，您应该可以执行以下操作：

Pttestv ActiveSheet.Range("A2:" & "A" & (Sheets("Sheet1").Range("E3").Value +1)),  ActiveSheet.Range("B2:" & "B" & (Sheets("Sheet1").Range("E3").Value + 1)), "", False, 0.05, 0

---

如果确实要使用

Application.Run

，则需要包含文件

ATPVBAEN.XLAM

的完整路径。VBA正在您的“文档”文件夹中查找它，但该文件夹不在其所在位置。

我在“工具/引用”选项卡中找不到atvbean.vbs或atpvbean.xlam。@JakeKruk如果安装了加载项，它应该显示在引用列表的顶部。必须为VBA启用分析工具包。谢谢！

Pttestv ActiveSheet.Range("A2:" & "A" & (Sheets("Sheet1").Range("E3").Value +1)),  ActiveSheet.Range("B2:" & "B" & (Sheets("Sheet1").Range("E3").Value + 1)), "", False, 0.05, 0