• ベストアンサー

EXCELでのラベル作成

お世話になります。 例えば、A4サイズで縦7マス×横4マスの枠を作成します。 その中に『 A-001 』から始まって『 A-028 』までを 印刷する場合、とりあえず1マスずつ入力したとします。 ここからが分からないのですが、必要な番号が『 A-560 』までの場合、どのようなやり方が効率がいいのでしょうか。 A4で20ページ分となりますが、シートが増えてもいいですし、1シートが大きくなっても構いません。 ただ、翌月には『 B-001 』から始まって『 B-560 』と印刷したいのです。 質問文が下手で申し訳ありません。 補足は致しますので、よろしくお願いいたします。

質問者が選んだベストアンサー

  • ベストアンサー
  • SI299792
  • ベストアンサー率47% (774/1618)
回答No.5

数式が簡単すぎて説明が難しい ROW() は行番号、COLUMN()は列番号を求めるための関数です。 B1: 行=1、列=2、1*4+2-5 = 1 C1: 行=1、列=3、1*4+3-5 = 2 ︙ B2: 行=2、列=2、2*4+3-5 = 5 ︙ となります。 それにA1に入れた文字を追加して、TEXTで頭に0を付けています。 ちなみに 列幅32 高さ75 フォントサイズ64 で丁度良かったです。

RDT23
質問者

お礼

ご丁寧にありがとうございました。

その他の回答 (5)

  • okok456
  • ベストアンサー率43% (2746/6352)
回答No.6

普通紙でも ラベルシールメーカーが提供するフリーソフトを利用 Excelの住所録 をWordの差し込み印刷機能でラベル作成 を利用できます。

RDT23
質問者

お礼

ご回答ありがとうございます。 こちらも勉強させていただきます。

  • msMike
  • ベストアンサー率20% (364/1804)
回答No.4

》 質問文が下手で申し訳ありません それはソレとして、貴方のカナ書きの「マス」。それ英語でなく古い日本語だと知ってました?漢字で「枡」「升」「桝」「斗」で、読みは「マス」で合ってマス。意味は辞書を引いて調べてネ。(^_^) Excel使いの仲間なら、これからは「セル」と書きましょうネ。

RDT23
質問者

お礼

ご回答ありがとうございます。 縦7セル 横4セル って書くのですか? 勉強になりました。

  • SI299792
  • ベストアンサー率47% (774/1618)
回答No.3

A1: A B1: =$A$1&"-"&TEXT(ROW()*4+COLUMN()-5,"000") E140までコピペ。 B1:E140 を印刷範囲にします。 後は、1ページが、縦7×横4になる様に、もしサイス、空白を調整します。 翌月は A1: B にします。

RDT23
質問者

お礼

ご回答ありがとうございます。 私が望んでいた事が完璧に実行されました。 お手数でなければ、この関数の意味を教えて頂きたく思います。

  • okok456
  • ベストアンサー率43% (2746/6352)
回答No.2

ラベルシールメーカーが提供するフリーソフトを利用 A-ONE ならラベル屋さん https://www.labelyasan.com/ コクヨ https://www.kokuyo-st.co.jp/stationery/awase/ エレコム https://www.elecom.co.jp/rakupuri/ 2社以外のラベルシールでも用紙のパッケージにソフトの紹介があるでしょう。 Excelの住所録 をWordの差し込み印刷機能でラベル作成が出来ます。 Wordに使用するラベルシートが有れば比較的簡単です。 https://www.nakagawa-mfg.co.jp/info/432/ 印刷範囲の設定する場合は 最初のレコードと最後のレコードを指定します。

RDT23
質問者

お礼

ご回答ありがとうございます。 シールも検討したのですが、コストを考えると用紙に印刷するしかないと考えています。

  • imogasi
  • ベストアンサー率27% (4737/17069)
回答No.1

ラベルシールは (1)市販の(裏のり付きの)ものを使うのか (2)シールの裏に、糊を手で付けて封筒やはがきに貼るのか どちらかぐらいは、質問に書くこと。 ーーー (2)ならセルを適当な大きさにして(高さ、幅)、28個を等面積でA4を縦7マス×横4マスに区画して、 各セルの外枠罫線引くようにして、テストプリントする。うまくサイズ的にA4用紙に収まったら、関数かVBAで、各(連続)セルにA-001からA-002・・の値を入れて、プリントする。 Printは関数では指示できないので、 VBAでRange("A1:D7").Printout (1行のみ) をINT(560÷28)+1回繰り返す。 Range("A1:D7")は繰り返し使用ということになる。 Range("A1:D7").は繰り返し20数回(560だから)ほど中身を変えて+印刷、中身を変えて+印刷、、・・を繰り返す。 (1)なら、28枚のものが見つかれば、市販のソフトを使いなさい。

RDT23
質問者

お礼

ご回答ありがとうございます。 勉強させていただきます。

関連するQ&A