Nối các tệp .doc thành một .doc (giữ định dạng gốc của mọi tài liệu)

Tôi có khoảng ~ 50 .doctệp, trông hoàn hảo (chúng được trích xuất bằng Able2Extract). Bây giờ tôi muốn tham gia 50 tệp này thành một tệp lớn .doc. Tôi đã thử sử dụng tính năng "Chèn" dựng sẵn của Word, nhưng điều đó làm rối tung toàn bộ định dạng. Tôi muốn giữ mọi thứ tôi có. Giống như chỉ document1 -> document2 -> document3 .

Không có gì "thông minh" hay "thông minh" cần thiết trong quá trình chuyển đổi, chỉ là khả năng tham gia chúng. (Do đó làm cho tất cả chúng có thể tìm kiếm được, đó là mục đích cuối cùng.) Tôi không phiền nếu phương pháp / giải pháp áp dụng một trang trống duy nhất ở mỗi tài liệu kết thúc.

microsoft-word batch

— Shiki
nguồn

Bản sao của superuser.com/questions/423732/ Mạnh ?

— Brad Patton

Lệnh insertfile của Word sẽ làm rối các tài liệu. Tôi không bận tâm ngay cả khi phương pháp áp dụng thêm một trang dự phòng giữa mỗi tài liệu. Tôi chỉ muốn giữ định dạng ban đầu của các tài liệu (mọi thứ khác sẽ bị biến dạng) và có thể tìm kiếm trong tệp lớn.

— Shiki

Điều này sẽ làm việc? answers.yahoo.com/question/index?qid=20100223061257AAlhcfw

— Saaru Lindestøkke

@BartArondson - Kịch bản mà Brad liên kết (cảm ơn Brad!) Sử dụng cách tiếp cận tương tự. Nó hoạt động một cách kỳ diệu đối với một số tệp và một số bị như ... thực sự bị biến dạng. Và tôi không thể sửa nó. Ý tôi là, nó không chỉ là một đường mà còn bị biến dạng hoàn toàn.

— Shiki

Quay lại kịch bản (Tôi muốn thử mọi thứ): Trợ giúp chính thức hiển thị: Italic ~ CTRL + I hoặc CTRL + SHIFT + I. Và đó là những gì xảy ra, gấp 51 lần chữ nghiêng và ngược lại. : - /

— Shiki

Câu trả lời:

Các tài liệu có phải ở trong một .doc sau khi bạn hoàn thành việc xây dựng chúng không? Bạn có thể thử kết hợp chúng thành một .pdf lớn với Adobe Acrobat hoặc một cái gì đó tương tự. Điều đó sẽ đạt được mục tiêu của bạn là có tất cả các tài liệu cùng nhau trong một định dạng có thể tìm kiếm, trong khi vẫn giữ nguyên định dạng / bố cục của từng tài liệu.

— Android Darth
nguồn

Mục đích cuối cùng là có một tài liệu epub có thể tìm kiếm. Hoặc bất cứ điều gì tương tự. PDF? Hmm ... Tôi không biết liệu Able2Extract có thể trích xuất lại nội dung từ PDF không, nhưng nó có thể đáng để thử, cảm ơn vì mẹo này!

— Shiki

Cách tốt nhất để tham gia các tài liệu trong khi vẫn giữ định dạng ban đầu là sử dụng VBA và tự động hóa các bước bạn sẽ làm để tham gia các tài liệu theo cách thủ công. Bạn sẽ cần ghi nhớ một số điều để đảm bảo định dạng vẫn như cũ:

Đảm bảo mỗi tài liệu được phân tách bằng một phần mới
Đảm bảo mỗi tài liệu được nhập bằng cách sử dụng Định dạng nguồn.

Macro VBA sau đây sẽ giúp tự động hóa quy trình trong khi ghi nhớ những điều trên. Tôi chưa kiểm tra nó trước nên tôi xin lỗi nếu có bất kỳ lỗi nào.

Sub CombineAll(sPath As String) 
    Dim baseDoc As Document, sFile As String 
    Set baseDoc = Application.Documents.Open(sPath & "BaseDoc.doc") 

    sFile = Dir(sPath & "*.doc") 
     'Loop through all .doc files in that path
    Do While sFile <> "" 

       Set sourceDoc = Application.Documents.Open(sPath & sFile) 
       Application.Selection.WholeStory
       Application.Selection.Copy
       Application.ActiveWindow.Close savechanges:=wdDoNotSaveChanges
       baseDoc.Activate

       Application.Selection.PasteAndFormat (wdFormatOriginalFormattig)
       baseDoc.InsertBreak Type:=wdSectionBreakNextPage
       sFile = Dir 
    Loop 
End Sub

— Ađam
nguồn