数据以将一个工作簿导出到另一工作簿

Question

我想将数据从一个工作簿导出到另一个.............要从源工作簿导出的数据（源工作簿的名称应写在单元格“ M1”中）和工作表“ SALARY”从范围列E4到S到目标工作簿（目标工作簿的名称应写在“ N11”中）和工作表“工资细节”将范围列A2到O。并且我想导出数据，如果“美国”列的值大于零。

Sub Salary() 
Name = ThisWorkbook.Worksheets("24Q INPUT DATA").Range("M1").Value 
Set src = Workbooks(Name).Sheets(6) 
x = Workbooks(Name).Sheets(6).Range("N11").Value 

Set des = Workbooks(x).Sheets(4) 
' desitination file 
  L2 = src.Cells(Rows.Count, 1).End(xlUp).Row 

If WorksheetFunction.Sum(src.Columns("US")) > 0 Then 
   src.Range("UJ12:ZB" & L2).Copy 
   des.Range("A3").PasteSpecial xlPasteValues 
End If 
Set src = Nothing 
Set des = Nothing 

End Sub

现在，数据正在导出，但是即使“ US”列为零，所有数据也在导出。