Як створити етикетки без Word в Excel (покрокова інструкція)

Hugh West

16-10-2023 Розширений Excel
  • Поділитися Цим
Hugh West

Етикетки корисні для нас у багатьох відношеннях. Ви можете створити етикетки в Excel за допомогою Microsoft Word. Але в деяких випадках це може доставити багато клопоту і забрати багато часу. Отже, ви можете захотіти створити етикетки в Excel без Word. У цій статті демонструється покрокове керівництво по створенню етикеток в Excel без Word.

Завантажити Практичний посібник

Ви можете завантажити робочий зошит практики за посиланням нижче.

Створення етикеток без Word.xlsm

Що таке етикетки?

Загалом, етикетка - це наклейка або аркуш паперу з описом предмета або продукту, до якого вона прикріплена. Етикетки використовуються в широкому спектрі застосувань. Наприклад, людям потрібно створювати етикетки для адрес, щоб вони могли прикріпити їх до конверта. Також ми можемо бачити етикетки, прикріплені до апаратного забезпечення в наших комп'ютерах, щоб ми могли їх ідентифікувати і знати про їхні технічні характеристики.

4 кроки по створенню етикеток без Word в Excel за допомогою VBA

Дуже зручно створювати етикетки в Excel без допомоги Microsoft Word Крім того, це економить багато часу і клопоту.

Припустимо, що у вас є набір даних з переліком Адреси ви хочете відправити свої різдвяні листівки. На цьому етапі ви хочете створити етикетки для них Адреси У цьому випадку ви можете виконати наведену нижче послідовність кроків для цього.

Крок 01 : Копіювання даних на новий аркуш в Excel

  • Спочатку скопіюйте адреси в колонці та вставте їх у поле Новий аркуш починаючи з комірки A1 .

Крок 02 : Відкриваємо вікно VBA та створюємо модуль в Excel

  • Потім натисніть ALT + F11 для відкриття VBA вікно.
  • Тепер виберіть аркуш, над яким ви зараз працюєте, і Клацніть правою кнопкою миші В даному випадку, це Аркуш 2 .
  • Далі послідовно виберіть Вставка > Модуль .

В кінцевому підсумку, ці набори кроків дозволять відкрити VBA і вставте нове вікно Модуль в твоєму простирадлі.

Крок 03 : Вставка коду в Excel

  • На цьому етапі скопіюйте наступний код і вставте його в порожнє поле. 
 'Цей код створить написи в Excel Sub Createlabels() Application.Run "AskForColumn" 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 Sub Sub AskForColumn() Dim refrg As Range Dim vrb As Long Dim dat As Long Set refrg = Cells(Rows.Count, 1, 1).End(xlUp) dat = 1 On Error Resume Next incolno = InputBox ("Введіть кількістьColumns Desired") For vrb = 1 To refrg.Row Step incolno Cells(dat, "A").Resize(1, incolno).Value = _ Application.Transpose(Cells(vrb, "A").Resize(incolno, 1)) dat = dat + 1 Next Range(Cells(dat, "A"), Cells(refrg.Row, "A")).ClearContents End Sub

💡 Пояснення коду:

На цьому етапі я поясню код, який використовувався вище. Як ви бачите, цей код складається з двох частин. Одна частина містить підкоди, а інша - підкоди. AskForColumn () який буде називатися Частина 01 а інша містить підзаголовок Createlabels() який буде називатися Частина 02 Тепер я поясню обидві ці частини по черзі.

Частина 01 :

На цьому етапі я розділив код на різні розділи і пронумерував кожен з розділів на наступному скріншоті. Отже, тут я буду пояснювати кожен розділ відповідно до їх номера.

  • Розділ 1: У цьому розділі створюється підрозділ з ім'ям AskForColumn .
  • Розділ 2: Тут ми оголошуємо різні змінні.
  • Розділ 3: У цьому розділі ми підраховуємо кількість рядків у стовпчику.
  • Розділ 4: Тепер, тут ми створюємо InputBox запитати про кількість колонок.
  • Розділ 5: У цьому розділі ми проводимо За Також ми використовуємо цикл Крок ключове слово, щоб запустити цикл стільки разів, скільки ми введемо в InputBox .
  • Розділ 6 : На даному етапі тут ми використовуємо цей розділ для розподілу комірки стовпця на різні рядки і стовпці за допомогою застосування Транспонувати та майно Змінити розмір .
  • Розділ 7: Нарешті, ми видаляємо зайвий вміст цього розділу.

Частина 02 :

В даному випадку я також розділив код на різні розділи і пронумерував кожен з розділів на наступному скріншоті. Відповідно, тут я буду пояснювати кожен розділ відповідно до їх номера.

  • Розділ 1: У цьому розділі створюється підрозділ з ім'ям Createlabels() .
  • Розділ 2: У цьому розділі ми називаємо сонце AskForColumn() бігти.
  • Розділ 3: На даний момент цей розділ визначає Формат комірки для всіх комірок за допомогою функції Клітини власність.

Крок 04 : Запустіть код для створення етикеток без Word в Excel

  • Тепер натисніть F5 для запуску підводного човна Етикетки () .
  • У результаті на екрані з'явиться вікно, подібне до наведеного нижче скріншоту.
  • На цьому етапі введіть кількість стовпців, в яких ви хочете розмістити свої етикетки.
  • Потім натисніть на кнопку ГАРАЗД. .

  • Нарешті, у вас будуть створені мітки, як показано на скріншоті нижче.

💡 Примітки :

  • Цей метод буде працювати тільки в тому випадку, якщо у вас є дані в одному стовпчику.
  • Після створення міток можна додати межі за допомогою кнопки Всі кордони опції в Головна сторінка рахунок.
  • Крім того, переконайтеся, що ви запустили підпрограму Createlabels() У цьому випадку, якщо ви запускаєте під, AskForColumn () ви не отримаєте бажаного результату.
  • Крім того, не вносити нічого, крім адрес, у колонку A .

Читати далі: Як створити мітки в Word зі списку Excel (покрокова інструкція)

Як надрукувати етикетки в Excel без слова

Після створення міток за допомогою вищезгаданих кроків, тепер вам може знадобитися друкуємо етикетки Тепер, якщо Ви бажаєте це зробити, Ви можете виконати наведені нижче кроки.

Кроки :

  • По-перше, зайдіть на сайт Макет сторінки у верхній частині сторінки.
  • Далі необхідно натиснути на кнопку Налаштування сторінки кнопку.

  • Після цього перейдіть за посиланням Маржа .
  • Тепер відредагуйте Топ і Дно маржі до 0.5 а потім відредагуйте Ліворуч і Так. маржі до 0.215 .
  • Отже, натисніть на ГАРАЗД. .

  • Тепер натисніть CTRL + P для відкриття Друк меню.
  • На цьому етапі натисніть на Без масштабування і з'являться 4 варіанти.
  • Далі з цих варіантів оберіть Вмістити всі колонки на одній сторінці .

  • Нарешті, ви готові до друку.
  • У цьому випадку попередній перегляд друку буде виглядати як на скріншоті нижче.

Читати далі: Як об'єднати етикетки з Excel у Word (покроково)

Висновок

І останнє, але не менш важливе: я сподіваюся, що ви знайшли те, що шукали в цій статті. Якщо у вас є якісь запитання, будь ласка, залиште коментар нижче. Крім того, якщо ви хочете прочитати більше подібних статей, ви можете відвідати наш веб-сайт ExcelWIKI .

Попередній пост Як змістити комірки вниз в Excel (5 простих способів)
Наступний пост Як обмежити кількість рядків в Excel (3 ефективних способи)

Г’ю Вест — досвідчений тренер і аналітик Excel із понад 10-річним досвідом роботи в галузі. Він має ступінь бакалавра з бухгалтерського обліку та фінансів і ступінь магістра з ділового адміністрування. Г’ю має пристрасть до викладання та розробив унікальний підхід до викладання, який легко зрозуміти та дотримуватися. Його експертне знання Excel допомогло тисячам студентів і професіоналів у всьому світі вдосконалити свої навички та досягти успіху в кар’єрі. У своєму блозі Г’ю ділиться своїми знаннями зі світом, пропонуючи безкоштовні навчальні посібники з Excel та онлайн-навчання, щоб допомогти окремим особам і компаніям повністю розкрити свій потенціал.