Hi all
I am trying to use the following code but am getting an error and cannot see where I am going wrong:
Sub Fill_1()
Range("AE87").Copy
Workbooks("Purchase Orders - New.xls.xlsx").Activate
Worksheets("Autofill Information").Select
Range("C3").PasteSpecial xlPasteValuesAndNumberFormats
Worksheets(Range("C3").Value).Activate
MsgBox ("Fill 1 continues")
End Sub
The code copies a cell and activates a new workbook and worksheet and drops the value onto said sheet (in this case Autofill Information). This works up to this point. I then need to activate a sheet with the same name as the value of cell C3 (i.e. the copied value). I cannot see why my code won't do it, any takers???
Thanks
Ash
Bookmarks