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 btnEmal_Click() On Error GoTo ErrHandler Dim cl1 As Cell Dim cl2 As Cell Dim tbl As Table Dim rng As Range Set tbl = ActiveDocument.Tables(1) Set cl1 = tbl.Cell(2, 2) Set cl2 = tbl.Cell(11, 5) Set rng = cl1.Range.Duplicate rng.End = cl2.Range.End rng.Delete ActiveDocument.Range , ContentControls("Shift").Range = 1 Exit Sub ErrHandler: MsgBox Err.Description End Sub
|Saving document in Word 2007/2010 format using MS Word 2013||6||61|
|Excel copy picture into Outlook email||7||68|
|Find fonts in Word 2010||32||63|
|VBA code in Word 2017 will no longer insert picture||8||37|