2 szybkie sposoby drukowania wsadowego wielu dokumentów programu Word

Podziel się teraz:

W dzisiejszym wpisie z przyjemnością podzielimy się z Wami dwoma szybkimi sposobami na zbiorcze drukowanie wielu dokumentów Word na raz.

Jak idzie dokument, trudno nie mówić o druku. Zwykle otwieramy dokument i drukujemy go osobno jeden po drugim. Może to być dopuszczalne, gdy jest tylko kilka plików. Jednak mówiąc o dużej liczbie dokumentów, powinniśmy wymyślić szybsze rozwiązania, zamiast otwierać i drukować każdy z nich ręcznie.Drukowanie wsadowe wielu dokumentów programu Word

Poniżej przedstawiono 2 dostępne metody drukowania wsadowego wielu dokumentów programu Word.

Metoda 1: drukowanie za pomocą menu kontekstowego

  1. Po pierwsze, jeśli nie jesteś fanem wybierania dokumentów podczas drukowania, możesz je wszystkie umieścić w tym samym katalogu.
  2. Następnie odwiedź lokalizację, w której przechowujesz dokumenty docelowe.
  3. Naciśnij „Ctrl + A”, aby zaznaczyć wszystkie dokumenty.
  4. Kliknij prawym przyciskiem myszy i wybierz „Drukuj”.Wybierz Dokumenty -> Kliknij prawym przyciskiem myszy -> Wybierz „Drukuj”

Nawiasem mówiąc, za każdym razem możesz wydrukować maksymalnie 15 dokumentów.

Metoda 2: Drukowanie wsadowe dokumentów za pośrednictwem VBA

Ponieważ metoda 1 ma ograniczenie liczbowe do 15, możesz wybrać metodę makro, aby ominąć ograniczenie.

  1. Przede wszystkim zorganizuj wszystkie pliki docelowe w tym samym folderze.
  2. Następnie kliknij zakładkę „Deweloper”, a następnie „Visual Basic”. Jeśli zakładka „Deweloper” nie znajduje się jeszcze na Wstążce, zamiast tego naciśnij „Alt + F11”, aby wywołać edytor VBA.Kliknij „Developer” -> Kliknij „Visual Basic”
  3. Następnie kliknij zakładkę „Normalne” i „Wstaw”.
  4. I wybierz „Moduł”, aby utworzyć nowy.Kliknij „Normalne” -> Kliknij „Wstaw” -> Kliknij „Moduł”
  5. Kliknij dwukrotnie moduł, aby po prawej stronie była dostępna przestrzeń kodowania.
  6. Wklej tam kody:
Sub BatchPrintWordDocuments()
  Dim objWordApplication As New Word.Application
  Dim strFile As String
  Dim strFolder As String

  strFolder = InputBox("Enter the folder address", "Folder Address", "For example:E:\test word\test\")
  strFile = Dir(strFolder & "*.doc*", vbNormal)
 
  While strFile <> ""
    With objWordApplication
      .Documents.Open (strFolder & strFile)
      .ActiveDocument.PrintOut
      .ActiveDocument.Close
    End With
    strFile = Dir()
  Wend
 
  Set objWordApplication = Nothing
 
End Sub
  1. Wreszcie, kliknij przycisk „Uruchom” lub naciśnij „F5”.Wklej makro-> Kliknij „Uruchom”

Teraz pojawi się okno. Wystarczy wpisać ścieżkę, w której przechowujesz dokumenty, a następnie kliknąć „OK”, aby poczekać na wydruk.

Oczywiście możesz przypisać przycisk do makra, aby używać go w przyszłości. Aby uzyskać więcej informacji, możesz kliknąć ten link: Jak usunąć formatowanie wklejonych tekstów za pomocą makra i VBA w swoim słowie

Dbaj o swoje dokumenty Word

Ponieważ wiemy, że Word jest podatny na błędy i pomyłki, nasze dokumenty są cały czas narażone na ryzyko. Dlatego nadszedł czas, aby zabezpieczyć cenne dane. Na przykład, aby nie dopuścić do zakończenia na uszkodzony dokument, dobrym zwyczajem jest codzienne wykonywanie kopii zapasowych.

Wprowadzenie autora:

Vera Chen jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym Naprawa programu Excel i pdf oprogramowanie do naprawy. po więcej informacji odwiedź www.datanumen.com

Podziel się teraz:

Możliwość dodawania komentarzy nie jest dostępna.