Reporting is one of the most important and least talked about aspects of a world-class threat intelligence program. Here’s how to do it right.
Sub SaveASFile() Dim SaveAsPath As String Dim Ans As String Dim fileName As String >>>>>>> ActiveWorkbook.SaveAs fileName:="C:\Users\pike\Desktop\backup\" fileName = Replace(ThisWorkbook.Name, ".xlsm", ".xls") Ans = MsgBox("Do you want to Save A Copy?", vbQuestion + vbYesNo, "Confirm Please!") If Ans = vbYes Then Application.DisplayAlerts = False >>>>>>>>> Workbook.Settings.CheckComptiliblity = False ThisWorkbook.SaveAs SaveAsPath & fileName, 51 Application.DisplayAlerts = True End If End Sub
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
14 Experts available now in Live!