Getting bold Pargraph

kirkm · #1 09-18-2016, 08:09 PM

Hi, I'm new to Word VBA but playing around with this

Code:

Sub ShowPara()
Stop
    Dim p As Paragraph, pp As String, MyParaNum As Integer
    Dim pp2 As String
    For Each p In ActiveDocument.Paragraphs
        MyParaNumber = MyParaNumber + 1
        pp = p.Range.Text
        If Not p.Range.End Then
            pp2 = p.Range.Next.Paragraphs(1).Range.Text
        End If
    
    Next
End Sub

Don't know if I need MyParaNum there may be another way but it's a count to return to that point in the doc (as needed).
I want to get each next paragraph after any paragraph that is bolded.
Is that possible ?

After finding I want to do some checks on it, then maybe replace it. I think it's p.Range.Text = pp (after pp has been modified).

Thanks.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Adding bold colons at end of bold row headings	bertietheblue	Word Tables	2	07-26-2015 07:26 AM
Text in #1 is made bold, rest of the document is edited, text in #1 is now not bold	footer-assistance	Word	1	06-29-2015 03:49 AM
Making Bold Using 'IF'	bigukfan	Mail Merge	3	03-10-2014 02:11 PM
Not Bold text but it comes up bold	Pluviophile	Word	7	10-22-2013 10:29 AM
Format Bold in one line makes all lines bold	Nitte	Word	2	02-07-2013 12:34 AM