Le etichette sono utili in molti modi. È possibile creare etichette in Excel con l'aiuto di Microsoft Word. In alcuni casi, però, questa operazione può essere molto fastidiosa e richiedere molto tempo. Per questo motivo, potreste voler creare etichette in Excel senza Word. Questo articolo illustra una guida passo passo su come creare etichette in Excel senza Word.

Scarica il quaderno di esercizi

È possibile scaricare il libro di esercizi dal link sottostante.

Cosa sono le etichette?

In generale, un'etichetta è un adesivo o un pezzo di carta che descrive l'oggetto o il prodotto a cui è attaccato. Le etichette sono utilizzate in un'ampia gamma di applicazioni. Ad esempio, è necessario creare etichette per gli indirizzi in modo da poterle attaccare alla busta. Inoltre, possiamo vedere etichette attaccate all'hardware dei nostri computer in modo da poterli identificare e conoscere le loro specifiche.

4 passaggi per creare etichette senza Word in Excel usando VBA

È molto conveniente creare etichette in Excel senza l'aiuto di Microsoft Word Inoltre, consente di risparmiare tempo e fatica.

Ora, supponiamo di avere un set di dati con un elenco di Indirizzi A questo punto, è necessario creare delle etichette per questi biglietti di Natale. Indirizzi In questo caso, è possibile seguire la serie di passaggi indicati di seguito.

Passo 01 Copiare i dati in un nuovo foglio in Excel

• Per prima cosa, copiate gli indirizzi della colonna e incollateli in un file Nuova scheda a partire dalla cella A1 .

Passo 02 : Aprire una finestra VBA e creare un modulo in Excel

• Quindi, premere ALT + F11 per aprire il VBA finestra.
• A questo punto, selezionate il foglio su cui state lavorando e Cliccare con il tasto destro del mouse In questo caso, è Scheda 2 .
• Successivamente, selezionare in sequenza Inserire > Modulo .

Alla fine, queste serie di passaggi apriranno il VBA e inserire una nuova finestra Modulo nel foglio.

Passo 03 Inserire il codice in Excel

• A questo punto, copiate il codice seguente e incollatelo nella casella vuota.

 Questo codice creerà le etichette in 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 AskForColumn() Dim refrg As Range Dim vrb As Long Dim dat As Long Set refrg = Cells(Rows.Count, 1).End(xlUp) dat = 1 On Error Resume Next incolno = InputBox("Enter Number ofColonne desiderate") 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 

💡 Codice Spiegazione:

A questo punto, spiegherò il codice utilizzato sopra. Come si può vedere, ci sono due parti di questo codice. Una parte contiene la sottoparte AskForColumn () che sarà definito come Parte 01 e l'altra contiene il sub Crea etichette() che sarà definito come Parte 02 Ora spiegherò entrambe le parti una per una.

Parte 01 :

A questo punto, ho diviso il codice in diverse sezioni e ho numerato ciascuna di esse nella schermata seguente. Di conseguenza, qui spiegherò ogni sezione in base al suo numero.

• Sezione 1: Questa sezione crea una sottoparte denominata Chiedi per la colonna .
• Sezione 2: Qui si dichiarano diverse variabili.
• Sezione 3: In questa sezione si conta il numero di righe della colonna.
• Sezione 4: Ora, si crea un oggetto Casella di input per richiedere il numero di colonne.
• Sezione 5: In questa sezione si esegue un Per Inoltre, utilizziamo il ciclo Passo per eseguire il ciclo il numero di volte che abbiamo inserito nel parametro Casella di input .
• Sezione 6 In questa fase, utilizziamo questa sezione per distribuire le celle della colonna in diverse righe e colonne utilizzando l'applicazione Trasposizione e proprietà Ridimensionamento .
• Sezione 7: Infine, eliminiamo i contenuti extra di questa sezione.

Parte 02 :

Anche in questo caso, ho diviso il codice in diverse sezioni e numerato ciascuna di esse nella schermata seguente. Di conseguenza, qui spiegherò ogni sezione in base al suo numero.

• Sezione 1: Questa sezione crea una sottoparte denominata Crea etichette() .
• Sezione 2: In questa sezione, chiamiamo il sole AskForColumn() per correre.
• Sezione 3: A questo punto, questa sezione definisce il Formato delle celle per tutte le celle utilizzando il metodo Cellule proprietà.

Passo 04 Eseguire il codice per creare etichette senza Word in Excel

• Ora, premere F5 per eseguire il sottoprogramma Crea etichette () .
• Di conseguenza, vedrete apparire sullo schermo un riquadro come quello riportato di seguito.
• A questo punto, inserire il numero di colonne in cui si desidera inserire le etichette.
• Quindi, fare clic su OK .

• Infine, avrete creato le vostre etichette come nella schermata seguente.

💡 Note :

• Questo metodo funziona solo se i dati sono contenuti in una singola colonna.
• Dopo aver creato le etichette, è possibile aggiungere i bordi utilizzando il comando Tutti i confini opzioni nella sezione Casa scheda.
• Inoltre, assicurarsi di eseguire la funzione sub Crea etichette() In questo caso, se si esegue la funzione sub, AskForColumn () non si otterrà il risultato desiderato.
• Inoltre, non inserire altro che gli indirizzi della colonna A .

Per saperne di più: Come creare etichette in Word da un elenco di Excel (guida passo-passo)

Come stampare etichette in Excel senza Word

Dopo aver creato le etichette utilizzando i passaggi sopra descritti, ora si può desiderare di stampare le etichette A questo punto, se si desidera farlo, è possibile seguire la procedura riportata di seguito.

Passi :

• Per prima cosa, andare alla pagina Layout di pagina dalla parte superiore della pagina.
• Successivamente, fare clic sul pulsante Impostazione della pagina pulsante.

• Dopodiché, andare su Margini .
• Ora, modificare il file In alto e Fondo margini per 0.5 e quindi modificare il file A sinistra e Diritto margini per 0.215 .
• Di conseguenza, fare clic su OK .

• Ora, premere CTRL + P per aprire il Stampa menu.
• A questo punto, fare clic su Nessun ridimensionamento e verranno visualizzate 4 opzioni.
• Quindi, tra queste opzioni, selezionare Inserire tutte le colonne in una pagina .

• Infine, siete pronti a stampare.
• In questo caso, l'anteprima di stampa sarà come la schermata seguente.

Per saperne di più: Come unire le etichette di posta elettronica da Excel a Word (con semplici passaggi)

Conclusione

Infine, spero che abbiate trovato quello che cercavate in questo articolo. Se avete domande, lasciate un commento qui sotto. Inoltre, se volete leggere altri articoli come questo, potete visitare il nostro sito web ExcelWIKI .