Hi and welcome to VBAX
I suppose how you do this depends on want you want as an end product, text file(s), an html file or something else.
You can check each paragraph to see if it's bulletted and output something to replicate that in whatever format you want to use.
Here I've just used the native VBA Print to add the text from each shape on each notes page to a text file, so I build the string by paragraph and add a "- " if it's bulletted[VBA]Dim sld As Slide
Dim shp As Shape
Dim p As Long
Dim strOutputText As String

'open text file
Open gFILE_PATH For Output As 1

For Each sld In ActivePresentation.Slides 'loop thru each slide
For Each shp In sld.NotesPage.Shapes 'loop thru each shape on the slide
strOutputText = ""
If shp.HasTextFrame Then 'if it is a textbox
With shp.TextFrame.TextRange
For p = 1 To .Paragraphs.Count 'go thru each para and simulate a bullet if required
If .Paragraphs(p, 1).ParagraphFormat.Bullet Then
strOutputText = strOutputText & "- " & .Paragraphs(p, 1).Text
Else
strOutputText = strOutputText & .Paragraphs(p, 1).Text
End If
Next p
End With
End If
Print #1, strOutputText 'write the shape text to the text file
Next shp
Next sld

Close #1 'close the text file[/VBA]