この記事では、ExcelからAveryラベルを印刷する方法について説明します。

練習用ワークブックをダウンロードする

練習用ワークブックは以下のリンクからダウンロードできます。

Averyラベルを印刷する.xlsm

Averyラベルを印刷する.docx

エクセルからエブリィラベルを印刷する2つの方法

ここでは、最初の方法はWordを使用し、2番目の方法はWordを使用せずにラベルを印刷する方法について説明します。

では、早速ですが、私たちがどのように ラベルを印刷する。

1.エクセルからワードでエブリィラベルを印刷する

ExcelやWordを使ってAveryラベルを印刷することができます。 順を追って見ていきましょう。

で示した次のようなデータセットを考えてみよう。 B4:F14 ここで、列は 会社名 , 住所 , 都市 , 状態 そして 郵便番号 の各受信者の

ステップ01：受信者テーブルの定義

• 初期状態では B4:F14 セルに移動し 数式> 名前の定義 .
• ここで、ダイアログボックスが表示されるので、適当な名前（この例では）を指定します。 会社名 .

注 単語と単語の間には空白を入れず、アンダースコアで区切ってもかまいません。

ステップ02：WordでAveryラベルを作る

• 次に、Microsoft Wordで白紙の文書を開き、タブに移動します。
• に移動してください。 メール配信> メールマージを開始する> ラベル .

• ここで、以下の画像のようにオプションを選択し、クリックします。 よっしゃー をクリックして、ダイアログボックスを閉じます。

• 次に、以下を選択します。 デザイン>ページボーダー .
• すぐに、ウィザードボックスが表示されるので、以下を選択します。 ボーダー＆グリッド .

これにより、白紙文書にグリッドが生成されます。

ステップ03：ExcelからWordに受信者リストをインポートする

• 3つ目は、次のページに移動することです。 郵送物 を選択します。 受信者を選択する> 既存のリストを使用する .

• 次に、今回はExcelファイルを選択して、Wordに元データを取り込みます。 Averyラベルを印刷する .

• 順番に、テーブル名を選びます 会社名 をリストから選択します。

これにより、ExcelワークシートとWord文書との接続が確立されます。

Step 04: Wordにフィールドを挿入する

• 四つ目は、次の通りです。 メール配信> アドレスブロック を選択し 適合するフィールド のオプションをダイアログボックスから選択します。

明らかに、ワークシートの列ヘッダーは自動的にそれぞれのフィールドと一致します。

• クリック よっしゃー をクリックして、ダイアログボックスを閉じます。

順番に、ラベルのプレビューを見て、不備があれば修正してから先に進みます。

• 次に ラベルの更新 にあります。 郵送物 タブで表示します。

その結果、すべてのラベルが アドレスブロック .

Step 05: マージ処理を完了させる

• 最後に メール送信> 仕上げ> マージ> 個別ドキュメントの編集 のオプションがあります。

• 次に、ダイアログボックスで、下の画像に従ってオプションをチェックし、クリックします。 よっしゃー .

最終的に、すべてのラベルがWord文書に表示されます。

• さらに、プレス CTRL + P をクリックすると、Wordの印刷オプションが表示されます。

さらに、プレビューウィンドウからラベルのプレビューを確認することができます。

続きを読む ExcelのリストからWordでラベルを作成する方法（ステップバイステップガイドライン）

類似の読み物

• エクセルで宛名ラベルを作成する方法（簡単な手順付き）
• ExcelからWordへラベルをメールマージする方法（簡単なステップ付き）

2.エクセルからワードなしでエブリィラベルを1枚印刷する

1列だけのデータであれば、Wordを使わずにラベルを印刷することができます。 簡単な作業ですので、ぜひ参考にしてください。

に次のようなデータセットがあるとします。 B4:B13 を表示する1列のみのセル 住所 .

ステップ01：データセットのコピーを作成する

• まず、データセットをコピーして、新しいワークシートに貼り付けます。

注 から始まる1列目のデータを貼り付ける必要があります。 A1 セルを作成し、列のヘッダーを削除します。

ステップ02：VBAコードを挿入する

• 2つ目は デベロッパー > ビジュアルベーシック .

• 次に、挿入する モジュール を貼り付ける場所です。 ブイビーエー のコードになります。

参照しやすいように、ここからコードをコピー＆ペーストしてください。

 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 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 

コードのブレークダウン

では、ラベルを生成するためのVBAのコードを説明します。 今回は、コードを2つに分けて説明します。

第1節 EnterColumn()サブルーチンの説明

の説明があります。 ブイビーエー のコードを以下に示します。

• 1- まず、サブルーチンに名前を付け、変数を定義します。
• 2- 次に、行数をカウントし、その数に応じて 入力ボックス を使用して、ユーザーからの入力を受けます。
• 3- 次に、a について で指定された回数だけループが実行されます。 入力ボックス .
• 4- 最後に トランスポーズ は、列を行に分割します。 リサイズ を作成し、余分なものを削除します。

第2章 Makelabels()サブルーチンの説明

同様にして ブイビーエー のコードを以下に説明します。

• 1- ここでは、サブルーチンに名前を付けます。
• 2- 次に、サブルーチンを実行する。
• 3- 最後に、セルの書式を指定するために 細胞 プロパティを使用します。

Step 03：ラベルを生成するVBAコードを実行する

• 3つ目は F5 キーで実行します。 マクラベルズ() のサブルーチンです。
• ダイアログボックスで、列の数を入力します。

を使用してボーダーを追加することができます。 オールボーダー オプションで ホーム タブで表示します。

Step 04：Excelからラベルを印刷する

• 四つ目は ページレイアウト タブをクリックし ページ設定 の矢印が角にある。
• 次に、以下を選択します。 マージン タブをクリックし、下図のようにページマージンを調整します。

• 次に CTRL + P を開いてください。 プリント のメニューがあります。
• このとき スケーリングなし を選択してください。 すべての列を1ページに収める オプションを使用します。

最後に、あなたは ラベルを印刷する また、以下のスクリーンショットのように、印刷プレビューを見ることができます。

続きを読む: ExcelでWordを使わずにラベルを作成する方法（ステップ・バイ・ステップ・ガイド）

覚えておきたいこと

• まず最初に。 m メソッド2 は、データセットに1つのカラムがある場合のみ適用されます。
• 次に、列のヘッダーを他のデータより目立つように書式設定することです。
• 第三に、予期せぬ結果をもたらす可能性があるため、空のセルがないことを確認する。

結論

最後に、私はこの記事がExcelからAveryラベルを印刷する方法を理解するのに役立ったことを願っています。 あなたが何かクエリを持っている場合は、以下のコメントを残してください。 また、あなたはこのような他の記事を読みたい場合は、当社のウェブサイトを訪問することができます。 エクセルウィキ .