#1
|
|||
|
|||
Help wanted passing data to Form
Code:
Sub ShowPara() Dim oPara As Paragraph, sText As String, oRng As Range For Each oPara In ActiveDocument.Paragraphs If oPara.Range.Bold = True Then If Not oPara.Range.End = ActiveDocument.Range.End Then Set oRng = oPara.Range.Next.Paragraphs(1).Range If oRng.Bold = False Then sText = oRng.Text oRng.Select XXXX End If End If End If Next oPara lbl_Exit: Exit Sub End Sub Userform1.Show and need to pass oRng.text and Opara.Range.Text to the Form (so I can edit them at the Form). Thanks for any help. |
#2
|
||||
|
||||
Why would you want to pass these data to a userform instead of to the Find/Replace dialogue? Editing the data in a userform won't of itself update the document.
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
#3
|
|||
|
|||
That's most unhelpful Paul. I didn't ask the question to be queried on WHY. This is something I want to know, for a variety of reasons.
|
#4
|
||||
|
||||
It seems to me you're wedded to a process, which you've told us about in a piecemeal fashion, without providing a meaningful context. You may regard the reply as unhelpful; from the bits you've deigned to share in a variety of disparate posts, I regard your approach as inefficient...
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
#5
|
|||
|
|||
No worries, but if someone else could help out, it'd be appreciated
|
Thread Tools | |
Display Modes | |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
passing variable from one sub to another | gbrew584 | Excel Programming | 10 | 03-21-2016 12:06 AM |
userform help (having trouble passing info from form to macro) | cyraxote | Word VBA | 16 | 09-08-2015 04:16 AM |
designing a custom outlook form - this form is for only sending mails nt collect data | balamuralibm | Outlook | 0 | 05-21-2014 08:08 AM |
Wanted: Printable List of Built-in Word styles | sbianco | Word | 4 | 07-21-2012 02:29 PM |
New Page - When Not Wanted | pgrant | Word | 2 | 06-07-2012 02:42 PM |