第一行代码：未定义用户定义的类型

Question

我是一个非常新的用户，我正在尝试打开三本工作簿，并在第四本书中将三本书的相同单元格范围复制到三个不同的范围。

我已经做了很多故障排除但我找不到任何帮助解决这个问题的方法。

问题指向Sub WeeklyLeagues（）

Option Explicit

    Sub WeeklyLeagues()

    Dim x_both As workbook_both
    Dim x_sf As workbook_sf
    Dim x_mf As workbook_mf
    Dim y As workbook_final

    Set x_both = Workbooks.Open("Sheet1 Path")
    Set x_sf = Workbooks.Open("Sheet2 Path")
    Set x_sf = Workbooks.Open("Sheet3 Path")
    Set y = Workbooks.Open("Sheet4 Path")

    x_both.Sheets("Request 4 Rank 1").Range("A2:E18").Copy
    y.Sheets("Source").Range("M2:Q18").PasteSpecial

    x_sf.Sheets("Request 4 Rank 1").Range("A2:E18").Copy
    y.Sheets("Source").Range("A2:E18").PasteSpecial

    x_mf.Sheets("Request 4 Rank 1").Range("A2:E18").Copy
    y.Sheets("Source").Range("G2:k18").PasteSpecial

    'Close x:
    x_both.Close
    x_sf.Close
    x_mf.Close

    End Sub