View Single Post
 
Old 09-18-2016, 08:09 PM
kirkm kirkm is offline Windows XP Office 2003
Advanced Beginner
 
Join Date: Aug 2013
Posts: 40
kirkm is on a distinguished road
Default Getting bold Pargraph

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.
Reply With Quote