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 UserForm_Initialize() ' <<<< code in user form (UF) Dim iRng As Range ' this is defined by a bookmark Dim parra As Paragraph Dim pText As String With ActiveDocument Set iRng = ActiveDocument.Bookmarks("iTxt").Range ' works, the range is selected iRng.Select For Each parra In iRng ' <<<< No matter what I do here the code fails with an unhelpful message pText = parra.Range.Text RefListBox.AddItem (pText) Next parra End With End Sub
Sub myUF() UF.Show End Sub
Join the community of 500,000 technology professionals and ask your questions.