Copy worksheet acting odd

[kckay]

I am running the following code:

Set wkb = ActiveWorkbook
        With Workbooks.Open(Filename:="C:\Sourcewb\blank.xlsm")
                       .Worksheets("Lookup Tables").Copy Before:=wkb.Worksheets(1)
         .close SaveChanges:=False
        End With

These lines of code

These lines of code operates correctly on my machine. The code does not work when run on another machine.

I am at a loss as to why it works on one machine, but not another.

 

[Joe4]

You code is referencing a file path and file name found on your hard-drive (C:\Sourcewb\blank.xlsm). Does that file path and file exist on the other computers too?

 

[kckay]

Yes, the directory is created with a standard naming convention on each machine.

 

[lman715]

The directory is created, but is the file? Have you tried copying the file to the same location on the other system to see if it worked?

 

[kckay]

Just re-checked. The directory is created and the file is, too. The target workbook does not have the sheet that is supposed to be copied from the source workbook.