VBA中使用FOR循环调用单元格数据出现错误438

想将工作簿2中与工作簿1中相同的ID的进行数据合并，但运行到第3行的时候报错

Dim a As Range, b As Range, c As Range, d As Range
Dim x%, y%,
For Each a In Workbooks(2).Sheet1.Range("E2:E132")
x = a.Rows.Count
For Each b In Workbooks(1).Sheet1.Range("E137:E180")
y = b.Rows.Count
If a = b Then
Workbooks(1).Sheet1.Range("GK" & y) = Workbooks(2).Sheet1.Range("E" & x)
Workbooks(1).Sheet1.Range("GL" & y).Resize(, 11) = Workbooks(2).Sheet1.Range("FS" & x & ":GC" & x)
End If

```Next



![图片说明](https://img-ask.csdn.net/upload/202002/12/1581520816_554305.jpg)
![图片说明](https://img-ask.csdn.net/upload/202002/12/1581520891_674056.jpg)



请各位大佬救救萌新