Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Sub SaveNew() Dim sFileName As String, SFilePath As String sFileName = ThisWorkbook.Name SFilePath = "C:\Temp\" Application.ScreenUpdating = False On Error GoTo errcather Sheets(Array("RPV", "RPV (2)")).Copy On Error GoTo 0 ActiveWorkbook.SaveAs Filename:=SFilePath & sFileName ActiveWorkbook.Close Savechanges:=False errcather: MsgBox "One or more the worksheets does not exist in this workbook" Application.ScreenUpdating = True End Sub
|how to modify the code so that when i select the name from the listbox the listbox should hide.||2||24|
|ASP.NET on IIS website not sending PDF file anymore ? [IzillaFramework Cognition]||6||21|
|how to loop through and process two columns in excel||8||24|
|excel issue taking data and formating into columns question||4||19|