VBA Copy Active worksheet to all workbooks in folder

[adainty]

Hi VBA Guru's

I've been looking all day for Copy Active worksheet to all workbooks in folder. I need to copy my sheet "Data Overview" to all workbooks in C:/Asia, I'm using excel 2007 I tried this code below but it says it can't open the file error 1004

 
Sub UpdateAllWorkbooks()

  Dim MyFolder As String
  Dim SrcWks As Worksheet
  Dim Wkb As Workbook
  Dim WkbName As String
  
    Set SrcWks = ThisWorkbook.Worksheets("Data Overview")
    MyFolder = "C:\Asia"
    
      WkbName = Dir(MyFolder & "\*.xlsx")
        Do While WkbName <> ""
          Set Wkb = Workbooks.Open(WkbName)
            SrcWks.Copy Before:=Wkb.Worksheets("Sheet1")
            Wkb.Close SaveChanges:=True
          WkbName = Dir()
        Loop
        
End Sub

Thanks in advance