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 mac_PDF4Pages() mac_PDF4Pages Macro MSG1 = MsgBox("Are you sure you want to save this PDF as "&(savename)&".PDF?,"Yes - Save","No - Wait") If MSG1 = "Yes - Save" then Sheets(Array("PDFpg1", "Quote Page-Full", "PDFpg3", "PDFpg4")).Select Sheets("Quote Page-Full").Activate ThisFile = Range("savename").Value ActiveWorkbook.SaveAs Filename:=ThisFile Else Sheets("Quote Page-Full").Activate
|VBA modules import||4||57|
|how to do this Excel search box Soundex Search||6||28|
|excel conditional formating||4||18|
|how to ignore blank cells from the data validation list?||16||29|