Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.
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
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.