VBA: Ext. Makro, Datei schließen, Makro bricht ab?

Sub VerschiebenIntern()
Dim Folder_Script, File_Script, Folder_Target, File_Target As String
Folder_Script = "C:\Users\z002zw9d\Desktop\Results_ME_HLTT\Testumgebung\"
File_Script = "Script.xlsm"
Folder_Target = ActiveWorkbook.Path & "\"
File_Target = ActiveWorkbook.Name
' Script öffnen,
Workbooks.Open Filename:=Folder_Script & File_Script
' Folder_Target & File_Target abspeichern
Range("C10") = Folder_Target
Range("C11") = File_Target
' und dessen Makro ausführen
Application.Run "'" & File_Script & "'!Test"
End Sub

Sub Test()
Dim Folder_Target, File_Target As String
If Range("C10")  "" And Range("C11")  "" Then
Folder_Target = Range("C10")
File_Target = Range("C11")
Else
MsgBox "LEER!"
End If
Workbooks(File_Target).Close savechanges:=False
MsgBox Folder_Target
MsgBox File_Target
End Sub