Excel 用户窗体中对差异表的VBA模块调用

新的，想问是否有人可以检查我的代码，看看我在哪里犯了错误

首先，我创建了一个表单，它有两个文本框和两个按钮，可以得到两个不同的目录和相关文件。这是通过调用将目录加载到文本框的函数来实现的

一个按钮，用于调用函数来导航目录并获取文件 专用子命令按钮3\u单击 '调用selectFile函数选择文件 选择文件

---

End Sub我在CommandButton1上看到一个打字错误

Private Sub CommandButton1_Click()
    getTheWorkbooksToCompare(fileNamePath1, fileNamePath2)
End Sub


Public Sub gettheWorkbooksToCompare(myPath1 As Workbook, myPath2 As Workbook)

---

可能还有更多的内容，但您没有在getThe中大写T，但您这样称呼它。

当您单击CommandButton1时，是否发生了任何事情？你能公布你收到的错误吗？或者在你尝试运行它的过程中发生了什么？嗨，谢谢你。。。我加上这个角色是为了尽量冗长，这样别人就可以看到我的思路了。。。我也仔细检查了一下以防万一命令按钮上仍然出现错误：预期的函数或变量1\u单击以获取WorkBooksToComparealso，如果我将按钮中的代码更改为：Dim t1作为msforms.textbox Dim t2作为msforms.txtbox调用getTheWorkbooksToComparet1，t2，则我在getTheWorkbooksToCompare模块内部出现错误，其中Set file1=高亮显示，错误为：object requiredOK。我再看看。错误消息提供了一个更好的线索。就比较而言，您正在声明它是什么类型的对象，但您没有定义实际的对象。比如说。txtFirstName.Text或只是textbox1.Text。。。不管你把实际的文本框命名为什么。我不会只是说，我将来会给你一个文本框，它想知道是哪一个。。