Hi People
I am a novice at this stuff and have been on this for a big part of the day and it is driving me nuts.
I have a master workbook with 8 worksheets that are exported, as required, in pairs. I have tried to create a macro that will
export these (to a new workbook) and autosave them to a directory, with a file name incorporating cell value "A2"
of one of the worksheets.
so the example below shows what i have been using, with the two worksheets i'm exporting being "SW Field Sheet"
and "EDMS_SW". "SW Field Sheet" contains the cell reference i want included in the output file name.
This worked at one stage, but has not since. Whats wrong?
Is the reference to "SW Field Sheet""A2" unclear?
Sub SWexport()
'
' SWevent Macro
'
' Keyboard Shortcut: Ctrl+s
'
Range("D4").Select
Sheets(Array("SW Field Sheet", "EDMS_SW")).Select
Sheets("EDMS_SW").Activate
Sheets(Array("SW Field Sheet", "EDMS_SW")).Copy
ActiveWorkbook.SaveAs Filename:= _
"Z:CLER_50ReportsR_" & ActiveSheet.Range("A2").Value & "_050_SW Field
Results.xls" _
, FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
Windows("FS_100204_50_Field Monitoring Sheet MASTER v5.xlsm").Activate
End Sub
Cheers
Nick