macro extract sentence from multiple files , and arrange sentence in order

How many documents are involved and how is their order identified?
How many sentences are involved?
When you say 'sentences' do you actually mean 'paragraphs'?

it will be 3 Docs for now but it might become 4 maximum 

I think that the following may work for you. I have only included three docs, but it would be simple enough to add a fourth. Change the paths and filenames as appropriate

Sub CombineDocs()
Const strDoc1 As String = "C:\path\filename1.docx"
Const strDoc2 As String = "C:\path\filename2.docx"
Const strDoc3 As String = "C:\path\filename3.docx"
Dim oDoc1 As Document
Dim oDoc2 As Document
Dim oDoc3 As Document
Dim oTarget As Document
Dim oSentence1 As Range
Dim oSentence2 As Range
Dim oSentence3 As Range
Dim i As Long
    Set oTarget = Documents.Add
    Set oDoc1 = Documents.Open(Filename:=strDoc1, AddToRecentFiles:=False, Visible:=False)
    Set oDoc2 = Documents.Open(Filename:=strDoc2, AddToRecentFiles:=False, Visible:=False)
    Set oDoc3 = Documents.Open(Filename:=strDoc3, AddToRecentFiles:=False, Visible:=False)
    For i = 1 To oDoc1.Sentences.Count
        oTarget.Range.InsertAfter Replace(oDoc1.Sentences(i), Chr(13), "") & vbCr
        oTarget.Range.InsertAfter Replace(oDoc2.Sentences(i), Chr(13), "") & vbCr
        oTarget.Range.InsertAfter Replace(oDoc3.Sentences(i), Chr(13), "") & vbCr
    Next i
    oDoc1.Close 0
    oDoc2.Close 0
    oDoc3.Close 0
    Set oDoc1 = Nothing
    Set oDoc2 = Nothing
    Set oDoc3 = Nothing
    Set oTarget = Nothing
    Set oSentence1 = Nothing
    Set oSentence2 = Nothing
    Set oSentence3 = Nothing
End Sub


http://www.gmayor.com/installing_macro.htm   

many thanks! 

Word will have real difficulty doing this through vba as the vba object model does not have a conventional understanding of what a sentence is. For example:

I went to Mr. Hill, who was speaking with Mrs. Smith about Christmas, New Year, etc., etc., ad nauseum.

would count as five sentences in vba, though you and I might only regard it as one.

I have to agree with Paul - and this was the main reason I asked if your 'sentences' were in fact 'paragraphs'. With paragraphs, what you asked would have been much easier to determine, but with sentences which are not so strictly defined, you would have to allow for every variation in what the perceived sentence was from what VBA indicates that it is. This is barely practical in a short example. In a book length document it would be impossible.

thank you for pointing that out 

I seriously doubt that would work.

 

Unless your explanations are organised so that they match up with the periods following abbreviations and with colons & semi-colons, etc. (indeed, anything that Word VBA treats as a sentence delimiter) they'll immediately lose synchronisation. In your posted scenario, the explanations for

Hill, who was speaking with Mrs.

Smith about Christmas, New Year, etc.

, etc.

, ad nauseum.

would all come from different VBA 'sentences', not the same VBA 'sentence', because there's no way for the VBA code to differentiate a grammatical sentence from a VBA 'sentence'.

 

Equally problematic is that the explanations will lose synchronisation with the source immediately any of the 'explanation' files contains more than one VBA 'sentence' for a given source VBA 'sentence'.

now I get to understand the point! 

now I get to understand the point! 

it took me several readings, though I do not think I fully understood you, I think I came up with solution for the biggest problem at hand.  

Here is the way to define sentences strictly,  I think. 

 

I did below find/replace for the docs I have and I belive each sentence is now defined as a paragraph. 

find: .  (Period + space) 

replace: . ^p^p ( period+^p^p) 

 

with above replacement, every sentence is distinguished with line break. 

No, what that will give you is:

I went to Mr.

 

Hill, who was speaking with Mrs.

 

Smith about Christmas, New Year, etc.

 

, etc.

 

, ad nauseum.