在Excel中键入不匹配错误，但在Access中不键入

Question

当我尝试在Excel中运行时出现type mismatch错误...

Dim wkb As Workbook
Dim wks As Worksheets

Set wkb = ThisWorkbook
Set wks = wkb.Worksheets(1)

当我在Access中执行相同的操作（包括Dim app as Application.Excel）时，我没有任何问题。

我在看什么？

Answer 1

类型不正确。您已定义＆＃34;工作表＆＃34;然后尝试分配一个＆＃34;工作表＆＃34;

更改：

Dim wks As Worksheets

到：

Dim wks As Worksheet

应该有用。