各位老师，帮看看GetObject最后保存目标工作表后工作表不见了

vba连接

Sub test()

Dim ywd As Workbook '源文件工作簿
Dim mwd As Workbook '目标文件工作簿
Dim ysheet As Worksheet
Dim msheet As Worksheet

' 打开源工作簿和目标工作簿
Set ywd = GetObject("C:\Users\Administrator\Desktop\临时\1.xlsx")
Set mwd = GetObject("C:\Users\Administrator\Desktop\临时\2.xlsx")

' 设置工作表
    Set ysheet = ywd.Sheets(1)
    Set msheet = mwd.Sheets(1)

' 复制和粘贴
    ysheet.Range("E3:E75").Copy
    msheet.Range("E3").PasteSpecial Paste:=xlPasteValues

    ' 保存目标工作簿
    mwd.Save

' 清除剪切板
    Application.CutCopyMode = False

    ' 关闭源工作簿，不保存
     ywd.Close SaveChanges:=False
     mwd.Close


'    Set ysheet = Nothing
'    Set msheet = Nothing
'    Set ywd = Nothing
'    Set mwd = Nothing


End Sub

vba连接

Windows(mwd.Name).Visible = True问题已查到