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.
Private Sub CommandButton1_Click() CommandButton1.Visible = False With ActivePresentation.PrintOptions .RangeType = ppPrintSlideRange With .Ranges .ClearAll .Add Start:=46, End:=46 End With .NumberOfCopies = 1 .Collate = msoTrue .OutputType = ppPrintOutputSlides .PrintHiddenSlides = msoTrue .PrintColorType = ppPrintColor .FitToPage = msoFalse .FrameSlides = msoFalse End With ActivePresentation.PrintOut CommandButton1.Visible = True End Sub
|Modify to work without control shift enter||9||27|
|Word 2013 VBA - How to assign a keyboard shortcut to a Macro||2||20|
|Turning off query prompts on runtime version of Access 2016||5||17|
|Access 2010 - Issue Viewing Records Added to a Linked SQL Table||13||43|