łączenie plików w word 2010 [pilne]

[Michał]

Help !! !! !!
Muszę na jutro połączyć kilka plików w odpowiedniej kolejności. Mają one kilka rzeczy, których nie da się wkleić tylko trzeba grzebać gdzieś po ramkach itd. Jak je połączyć ?? W wordzie 2003 robi się to tak:
Word>wstaw>plik
ale w 2010 tego nie ma !!
Z góry thx za odp

 

[OXYGEN THIEF]

Spoiler: Pokaż zawartość

Zaloguj lub Zarejestruj się aby zobaczyć!

Spoiler: Pokaż zawartość

Zaloguj lub Zarejestruj się aby zobaczyć!

[lmgtfy]Word 2010 merge documents[/lmgtfy]

 

[Michał]

W folderze mam 4 pliki nie powinienem zmienić czegoś w moim kodzie

Sub MergeDocs()

Dim rng As Range

Dim MainDoc As Document

Dim strFile As String

Const strFolder = "C:\Users\Michał\Desktop\Ksiega symboli\"

Set MainDoc = Documents.Add

strFile = Dir$(strFolder & " * .doc")
Do Until strFile = “”

Set rng = MainDoc.Range

rng.Collapse wdCollapseEnd

rng.InsertFile strFolder & strFile

strFile = Dir$()

Loop

End Sub