Etykiety składają się z małych kawałków papieru, które dostarczają informacji o obiekcie. W rzeczywistości ten artykuł przedstawia, jak drukować etykiety Avery z programu Excel.

Pobierz Zeszyt ćwiczeń

Zeszyt ćwiczeń można pobrać z poniższego linku.

Print Avery Labels.xlsm

Print Avery Labels.docx

2 Metody drukowania etykiet Avery z programu Excel

Microsoft Excel sprawia, że drukowanie etykiet jest prostym zadaniem. Co prawda pominąłem szczegóły dotyczące etykiet, które możesz zgłębić, jeśli chcesz Tutaj pierwsza metoda wykorzystuje Worda, natomiast druga drukuje etykietę bez Worda.

Tak więc, bez dalszej zwłoki, zobaczmy jak możemy drukować etykiety.

1) Drukowanie etykiet Avery za pomocą programu Word z Excela

Możesz wydrukować etykiety Avery za pomocą programu Excel i Word, zobaczmy proces krok po kroku.

Rozważmy następujący zbiór danych przedstawiony w B4:F14 komórki. Tutaj kolumny pokazują Nazwa firmy , Adres , Miasto , Państwo oraz Kod pocztowy każdego z odbiorców.

Krok 01: Zdefiniowanie tabeli odbiorców

• Na początku należy wybrać B4:F14 i udać się do Formuły> Określenie nazwy .
• Teraz pojawia się okno dialogowe, w którym podajemy odpowiednią nazwę, w tym przypadku, Company_Name .

Uwaga: Upewnij się, że nie ma pustych miejsc między słowami. Możesz raczej użyć podkreślenia, aby oddzielić każde słowo.

Krok 02: Tworzenie etykiet Avery w programie Word

• Po drugie, otwórz pusty dokument w programie Microsoft Word. i przejdź do zakładki.
• Następnie należy przejść do Mailings> Start Mail Merge> Etykiety .

• Teraz należy wybrać opcje jak na obrazku poniżej i kliknąć OK aby zamknąć okno dialogowe.

• Następnie należy wybrać Projektowanie> Granice stron .
• Natychmiast pojawi się okno kreatora, wybierz Granice> Siatka .

To generuje siatkę w pustym dokumencie.

Krok 03: Importuj listę odbiorców z Excela do Worda

• Po trzecie, przejdź do Mailings jednak tym razem wybierz Wybierz odbiorców> Użyj istniejącej listy .

• Następnie importujemy dane źródłowe do Worda wybierając plik Excela, w tym przypadku, Drukowanie etykiet Avery .

• Z kolei wybieramy nazwę tabeli Company_Name z listy.

W ten sposób ustanawia się połączenie między arkuszem Excela a dokumentem Worda.

Krok 04: Wstawianie pól w programie Word

• Po czwarte, przejdź do Mailings> Blok adresowy i wybrać Pola dopasowania opcje z okna dialogowego.

Wyraźnie widać, że nagłówki kolumn z arkusza automatycznie dopasowują się do odpowiadających im pól.

• Kliknij OK aby zamknąć okno dialogowe.

Z kolei na etykietach widzimy podgląd, aby przed przystąpieniem do dalszych czynności poprawić ewentualne niedociągnięcia.

• Następnie klikamy na Aktualizacja etykiet zlokalizowany w Mailings tab.

W rezultacie wszystkie etykiety zmieniają się na AddressBlock .

Krok 05: Zakończenie procesu scalania

• Na koniec przejdź do Mailings> Finish & Merge> Edycja poszczególnych dokumentów opcje.

• Następnie w oknie dialogowym należy zaznaczyć opcje zgodnie z poniższym obrazkiem i kliknąć OK .

Ostatecznie wszystkie etykiety pojawiają się w dokumencie Worda.

• Dodatkowo, naciśnij CTRL + P aby otworzyć opcję drukowania w programie Word.

Ponadto z okna podglądu można zobaczyć podgląd etykiet.

Read More: Jak tworzyć etykiety w Wordzie z listy Excela (Poradnik krok po kroku)

Podobne lektury

• Jak tworzyć etykiety wysyłkowe w Excelu (z prostymi krokami)
• Jak scalać etykiety z Excela do Worda (prostymi krokami)

2. drukuj pojedynczą etykietę Avery bez programu Word z programu Excel

Jeśli masz dane obejmujące tylko jedną kolumnę, możesz wydrukować etykiety bez programu Word. To prosty proces, więc po prostu podążaj za nim.

Załóżmy, że mamy następujący zbiór danych w B4:B13 komórki z tylko jedną kolumną pokazującą Adres .

Krok 01: Utworzenie kopii zbioru danych

• Po pierwsze, skopiuj zbiór danych i wklej go do nowego arkusza.

Uwaga: Należy wkleić dane do pierwszej kolumny zaczynając od. A1 komórkę i usunąć wszystkie nagłówki kolumn.

Krok 02: Wstaw kod VBA

• Po drugie, przejdź do Deweloper > Visual Basic .

• Następnie należy wstawić Moduł gdzie wkleisz VBA kod.

Dla ułatwienia możesz skopiować i wkleić kod z tego miejsca.

 Sub Makelabels() Application.Run "EnterColumn" Cells.Select Selection.RowHeight = 75.75 Selection.ColumnWidth = 34.14 With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlBottom .WrapText = False .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With Selection .HorizontalAlignment = xlCenter.VerticalAlignment = xlCenter .WrapText = False .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With End Sub Sub EnterColumn() Dim reference As Range Dim item As Long Dim data As Long Set reference = Cells(Rows.Count, 1).End(xlUp) data = 1 On Error Resume Next incolno = InputBox("Enter Number of Columns Desired") For item.= 1 To reference.Row Step incolno Cells(data, "A").Resize(1, incolno).Value = _ Application.Transpose(Cells(item, "A").Resize(incolno, 1)) data = data + 1 Next Range(Cells(data, "A"), Cells(reference.Row, "A")).ClearContents End Sub 

Podział kodu:

Teraz wyjaśnię kod VBA używany do generowania etykiet. W tym przypadku kod jest podzielony na dwie części.

Sekcja 1: Objaśnienie działania podprogramu EnterColumn()

Wyjaśnienie VBA kod jest podany poniżej.

• 1- Po pierwsze, podprogramowi nadawana jest nazwa, a także definiowane są zmienne.
• 2- Następnie zliczamy liczbę wierszy i tworzymy tabelę InputBox aby przyjąć dane wejściowe od użytkownika.
• 3- Następnie, a Dla pętla uruchamia się tyle razy, ile określono w InputBox .
• 4- W końcu Transpozycja kolumny na wiersze, Zmień rozmiar komórek i usunąć ich dodatkową zawartość.

Sekcja 2: Opis podprogramu Makelabels()

W podobny sposób VBA kod jest wyjaśniony poniżej.

• 1- W tej sekcji podprogramowi nadawana jest nazwa.
• 2- Następnie wykonujemy podprogram.
• 3- Na koniec określ formatowanie komórek za pomocą Komórki nieruchomość.

Krok 03: Uruchomienie kodu VBA w celu wygenerowania etykiet

• Po trzecie, naciśnij przycisk F5 przycisk, aby uruchomić Makelabels() podprogram.
• W oknie dialogowym wprowadź liczbę kolumn.

Możesz dodać obramowanie używając Wszystkie granice opcja w Strona główna tab.

Krok 04: Drukowanie etykiet z programu Excel

• Po czwarte, przejdź do Układ strony i kliknij na zakładkę Ustawienie strony strzałka na rogu.
• Następnie należy wybrać Marginesy i dostosuj margines strony w sposób przedstawiony poniżej.

• Następnie należy użyć CTRL + P aby otworzyć Drukuj menu.
• W tym momencie należy nacisnąć przycisk Brak skalowania z listy rozwijanej i wybierz Zmieść wszystkie kolumny na jednej stronie opcja.

Wreszcie, jesteś gotowy do wydrukować etykiety Ponadto można obserwować podgląd wydruku, jak pokazano na poniższym zrzucie ekranu.

Read More: Jak tworzyć etykiety bez Worda w Excelu (Przewodnik krok po kroku)

Rzeczy do zapamiętania

• Po pierwsze, m etoda 2 ma zastosowanie tylko wtedy, gdy masz pojedynczą kolumnę w swoim zestawie danych.
• Po drugie, sformatuj nagłówki kolumn tak, aby wyróżniały się od reszty danych.
• Po trzecie, upewnij się, że nie ma pustych komórek, ponieważ może to prowadzić do nieoczekiwanych wyników.

Wniosek

Podsumowując, mam nadzieję, że ten artykuł pomógł Ci zrozumieć, jak drukować etykiety Avery z programu Excel. Jeśli masz jakieś pytania, proszę zostawić komentarz poniżej. Ponadto, jeśli chcesz przeczytać więcej artykułów takich jak ten, możesz odwiedzić naszą stronę internetową ExcelWIKI .