I use the code below to save a my .xlsm as a .xlsx file. However when I save the .xlsx file I still receive a warning about macos in the non-macro enabled workbook. Any assistance is appreciated.
VBA Code:
Sub m_SaveWBasXLSX()
'
With Application
.ScreenUpdating = False 'True
.EnableEvents = True 'False
.DisplayAlerts = False
.Calculation = xlManual 'xlCalculationAutomatic
End With ' Application
'
Dim ThisWb As Workbook
'
Set ThisWb = ActiveWorkbook
ChDrive "S:"
ThisWb.SaveAs "S:\AD_Listing_" & Format(Now, "mm-dd-yyyy_hmmAM/PM") & ".xlsx", FileFormat:=51
ThisWb.Save
With Application
.ScreenUpdating = True 'False
.EnableEvents = True 'False
.DisplayAlerts = False
.Calculation = xlCalculationAutomatic 'xlManual
End With ' Application
End Sub