Find a word and then check if its paragraph is a list pargraph or not

RobiNew · #1 12-01-2023, 10:00 AM

I'm tryng to check if a paragraph containg the 'Found' word is a list paragraph or not. Can someone help with the tentative code here below? Thanks!

Code:

Sub ListOrNot()
Dim aRng As Range
Set aRng = ActiveDocument.Range
    With aRng.Find
      .ClearFormatting
      .Replacement.ClearFormatting
      .Wrap = wdFindStop
      .Format = False
      .MatchCase = False
      .MatchWildcards = False
      .Text = "Title"
      .Execute
    End With
check = aRng.Find.Found.ListFormat.ListType
MsgBox check
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Find longest paragraph in Word document	keimba	Word VBA	2	09-11-2019 03:26 PM
Find word, Insert Paragraph and bookmark	gattaca714	Word VBA	2	03-24-2017 09:23 PM
Getting bold Pargraph	kirkm	Word VBA	11	09-19-2016 05:07 PM
Find Word then Highlight Whole Sentence and Paragraph Around it	ChrisOK	Word VBA	4	09-08-2016 10:16 PM
Find last word in paragraph and delete it	Dave T	Word VBA	3	05-21-2015 12:40 AM