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.
Add your voice to the tech community where 5M+ people, just like you, are talking about what matters.
Private Sub CommandButton21_Click() Dim sMyDir As String Dim sDocName As String ' The path to obtain the files. sMyDir = "\Folder Path" sDocName = Dir(sMyDir & "*.DOCX") While sDocName <> "" ' Print the file. Application.PrintOut FileName:=sMyDir & sDocName ' Get next file name. sDocName = Dir() Wend End Sub
|How to open a ZIP file.||6||47|
|Converting large .PDF files.||6||67|
|How to find many digits in NotePad++ with easy and simple way?||2||30|
|Word if statement for the calendar activex on a docm word 2010 document||5||21|