Etiketes sudaro maži popieriaus lapeliai, kuriuose pateikiama informacija apie objektą. Šiame straipsnyje aprašoma, kaip spausdinti "Avery" etiketes iš "Excel".

Atsisiųsti praktikos sąsiuvinį

Praktikos sąsiuvinį galite atsisiųsti iš toliau pateiktos nuorodos.

Spausdinti "Avery" etiketes.xlsm

Spausdinti "Avery" etiketes.docx

2 "Avery" etikečių spausdinimo iš "Excel" būdai

"Microsoft Excel" leidžia spausdinti etiketes. Tiesa, praleidau išsamią informaciją apie etiketes, kurią galite išnagrinėti, jei norite Čia pirmuoju metodu naudojamas "Word", o antruoju metodu etiketės spausdinamos be "Word".

Taigi nedelsdami pažiūrėkime, kaip galime spausdinti etiketes.

1. Spausdinti "Avery" etiketes naudojant "Word" iš "Excel

Galite spausdinti "Avery" etiketes naudodami "Excel" ir "Word". Pažiūrėkime procesą žingsnis po žingsnio.

Panagrinėkime šį duomenų rinkinį, pateiktą B4:F14 langelius. Čia stulpeliuose rodomi Įmonės pavadinimas , Adresas , Miestas , Valstybė , ir Pašto kodas kiekvieno iš gavėjų.

01 veiksmas: apibrėžti gavėjų lentelę

• Iš pradžių pasirinkite B4:F14 ląstelių ir eikite į Formulės> Apibrėžti pavadinimą .
• Dabar rodomas dialogo langas, kuriame nurodome tinkamą pavadinimą, šiuo atveju, Įmonės pavadinimas .

Pastaba: Įsitikinkite, kad tarp žodžių nėra tuščių tarpų. Atvirkščiai, kiekvieną žodį galite atskirti pabraukimais.

Žingsnis 02: "Avery" etikečių kūrimas "Word" programoje

• Antra, atidarykite tuščią dokumentą "Microsoft Word" programoje ir eikite į skirtuką.
• Toliau eikite į Pašto siuntos> Pradėti Mail Merge> Etiketės .

• Dabar pasirinkite toliau pateiktame paveikslėlyje parodytas parinktis ir spustelėkite GERAI uždaryti dialogo langą.

• Tada pasirinkite Dizainas> Puslapio ribos .
• Iškart pasirodys vedlio langas, pasirinkite Ribos> Tinklelis .

Taip tuščiame dokumente sukuriamas tinklelis.

Žingsnis 03: Importuoti gavėjų sąrašą iš "Excel" į "Word

• Trečia, eikite į Pašto pranešimai tačiau šį kartą pasirinkite Pasirinkite gavėjus> Naudokite esamą sąrašą .

• Toliau importuojame šaltinio duomenis į "Word", šiuo atveju pasirinkdami "Excel" failą, Spausdinti "Avery" etiketes .

• Savo ruožtu pasirenkame lentelės pavadinimą Įmonės pavadinimas iš sąrašo.

Taip sukuriamas ryšys tarp "Excel" darbalapio ir "Word" dokumento.

04 veiksmas: laukų įterpimas į "Word

• Ketvirta, eikite į Pašto siuntos> Adresų blokas ir pasirinkite Rungtynių laukai dialogo lango parinktis.

Akivaizdu, kad darbalapio stulpelių antraštės automatiškai sutampa su atitinkamais laukais.

• Spustelėkite GERAI uždaryti dialogo langą.

Savo ruožtu matome etikečių peržiūrą, kad galėtume ištaisyti bet kokius trūkumus prieš tęsdami darbą.

• Tada spustelėkite Atnaujinti etiketes esančioje Pašto pranešimai skirtukas.

Dėl to visos etiketės pakeičiamos į Adresų blokas .

05 veiksmas: užbaigti sujungimo procesą

• Galiausiai eikite į Pašto siuntos> Baigti> Sujungti> Redaguoti atskirus dokumentus galimybės.

• Toliau dialogo lange pažymėkite toliau pateiktame paveikslėlyje nurodytas parinktis ir spustelėkite GERAI .

Galiausiai visos etiketės atsiranda "Word" dokumente.

• Be to, paspauskite CTRL + P atidaryti "Word" spausdinimo parinktį.

Be to, peržiūros lange galite peržiūrėti etikečių peržiūrą.

Skaityti daugiau: Kaip sukurti etiketes "Word" programoje iš "Excel" sąrašo (žingsnis po žingsnio gairės)

Panašūs skaitiniai

• Kaip sukurti pašto etiketes "Excel" programoje (paprastais žingsniais)
• Kaip sujungti pašto etiketes iš "Excel" į "Word" (paprastais žingsniais)

2. Spausdinti vieną "Avery" etiketę be "Word" iš "Excel

Jei duomenys apima tik vieną stulpelį, galite spausdinti etiketes be "Word". Tai paprastas procesas, todėl sekite toliau.

Tarkime, kad turime tokį duomenų rinkinį B4:B13 langelius, kuriuose yra tik vienas stulpelis, rodantis Adresas .

01 veiksmas: padarykite duomenų rinkinio kopiją

• Pirmiausia nukopijuokite duomenų rinkinį ir įklijuokite jį į naują darbalapį.

Pastaba: Duomenis reikia įklijuoti į pirmąjį stulpelį, pradedant nuo A1 ląstelę ir pašalinkite visas stulpelių antraštes.

02 veiksmas: įterpkite VBA kodą

• Antra, eikite į Kūrėjas > "Visual Basic .

• Tada įterpkite Modulis kur įklijuosite VBA kodas.

Kad būtų paprasčiau, galite nukopijuoti ir įklijuoti kodą iš šios nuorodos.

 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 With Selection .HorizontalAlignment = xlCenter.VerticalAlignment = xlCenter .WrapText = False .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With 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("Įveskite norimą stulpelių skaičių") 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 

Kodo suskirstymas:

Dabar paaiškinsiu VBA kodą, naudojamą etiketėms generuoti. Šiuo atveju kodas padalytas į dvi dalis.

1 skirsnis: "EnterColumn()" paprogramės paaiškinimas

Paaiškinimas VBA kodas pateikiamas toliau.

• 1 - Pirmiausia paprogramei suteikiamas vardas ir apibrėžiami kintamieji.
• 2 - Tada suskaičiuojame eilučių skaičių ir sukuriame InputBox priimti įvesties duomenis iš naudotojo.
• 3 - Tada a Tinklalapiui ciklas paleidžiamas tiek kartų, kiek nurodyta InputBox .
• 4- Galiausiai, mes Transponuoti stulpelį į eilutes, Pakeisti dydį langelius ir pašalinkite bet kokį papildomą turinį.

2 skirsnis: "Makelabels()" paprogramės aprašymas

Panašiai kaip ir VBA kodas paaiškintas toliau.

• 1- Šiame skirsnyje paprogramei suteikiamas pavadinimas.
• 2- Toliau vykdome paprogramę.
• 3- Galiausiai nurodykite ląstelių formatavimą naudodami Ląstelės nuosavybė.

03 veiksmas: VBA kodo paleidimas etiketėms generuoti

• Trečia, paspauskite F5 klavišą, kad paleistumėte Padaryti etiketes() paprogramė.
• Dialogo lange įveskite stulpelių skaičių.

Apvadus galite pridėti naudodami Visos ribos parinktį Pagrindinis skirtukas.

04 žingsnis: Etikečių spausdinimas iš "Excel

• Ketvirta, eikite į Puslapio išdėstymas skirtuką ir spustelėkite Puslapio sąranka rodyklė kampe.
• Tada pasirinkite Maržos skirtuką ir pakoreguokite puslapio kraštinę, kaip parodyta toliau.

• Tada naudokite CTRL + P atidaryti Spausdinti meniu.
• Šiuo metu paspauskite Nėra mastelio keitimo išskleidžiamąjį meniu ir pasirinkite Visų stulpelių talpinimas viename puslapyje galimybė.

Galiausiai esate pasirengę spausdinti etiketes Be to, galite stebėti spausdinimo peržiūrą, kaip parodyta toliau pateiktoje ekrano kopijoje.

Skaityti daugiau: Kaip "Excel" programoje kurti etiketes be "Word" (žingsnis po žingsnio vadovas)

Dalykai, kuriuos reikia prisiminti

• Pirma, m 2 metodas taikoma tik tuo atveju, jei duomenų rinkinyje yra vienas stulpelis.
• Antra, suformatuokite stulpelių antraštes taip, kad jos išsiskirtų iš kitų duomenų.
• Trečia, įsitikinkite, kad nėra tuščių langelių, nes tai gali lemti netikėtus rezultatus.

Išvada

Baigdamas tikiuosi, kad šis straipsnis padėjo jums suprasti, kaip spausdinti "Avery" etiketes iš "Excel". Jei turite kokių nors klausimų, palikite komentarą toliau. Be to, jei norite perskaityti daugiau panašių straipsnių, galite apsilankyti mūsų svetainėje ExcelWIKI .