Can you please help,
I'm using below to save my workbook,
I need to be able to exclude few sheets from being saved.
I need to remove the Macro buttons from the newly saved Workbook.
Dim mySheetList() As String
Dim strFileName1 As String
strFileName1 = Range("P1").Value & ".xlsx"
ReDim mySheetList(0 To (ThisWorkbook.Sheets.Count) - 1)
Dim a As Integer
a = 0
For Each ws In ActiveWorkbook.Worksheets
mySheetList(a) = ws.Name
a = a + 1
ActiveWorkbook.SaveAs Filename:= "C:\Users\Wassim\Desktop\" & strFileName1, FileFormat:=51, CreateBackup:=False
Any help is appreciated.