Microsoft Office Forums - View Single Post - [Solved] Find paragraph matching an expression in Word and exporting to Excel spreadsheet

ballpoint · 03-19-2018, 09:57 AM

I am bumping up this thread as I am now trying to do something different, that is to say, extract the expressions contained between certain marks. So, for example, I would like to extract the word "artist" if it is between three asterisks and three asterisks "***" And "***", like so:

***artist***

I understand that I would have to change something in this part of the code, but I have not been lucky so far.

Code:

 xlShtOut.Range("C" & j).Value = Replace(Split(.Paragraphs(1).Range.Text, vbCr)(0), vbTab, " ")
          .Start = .Paragraphs(1).Range.End

Does anybody have any suggestions?

Thank you!