宛名ラベル作成について質問させていただきます。
はじめはwordの差込印刷を使用していたのですが、
社名ごとに改ページを入れることが出来ず、各社ごとのデータを作り、会社数分(約300社)を1枚ずつ差込みしている状態です。
Exceiでマクロを使用してできるのではないかと思い、
調べてみたのですが、宛名ラベルの形式が、3列×8行の24枚シートなので、どうもうまくいきません。
…マクロ初心者なのに手を出してしまった浅はかな考えを反省しています。
データは社名、役職、氏名の3種類です。
それを左から右へ順番にデータが入っていき、
社名が変わると印刷され、
開始位置にもどり、
再び、データが入っていく…というようなことが、マクロで可能でしたら教えていただきたく、思います。
マクロでなく、ワードで可能!というご指摘も大歓迎です。
ちなみに、うちの会社ではアクセスが入っていません。
いままでこういったものは外注していたようで…。
どうぞよろしくお願いいたします。
No.3
- 回答日時:
そんな面倒な事をしなくとも、それ専用の市販ソフトがあります。
http://www.vector.co.jp/soft/win95/writing/se417 …
私のところでも利用していますが、大変便利でお勧めです。
ソフト購入に消極的な会社なので、購入は難しいかと思いますが、
このような便利なものがあるというのを教えていただいてありがとうございます。
No.2
- 回答日時:
エクセルVBAではこうすれば出来るとおもう。
(1)現データ
会社別に(会社名列で)ソートしておく
(2)印刷シートとシートセルの調節。
私はプログラム内で、数量的に指定して、ある特定の会社のラベルに3列8枚の位置に配置はようしない。(本式のラベル印刷などは、ヒサゴの何号と指定できっちり位置決めできているが。)
それで実際に試行錯誤して、列幅、行高、余白、遊び列、遊び行、フォントサイズ、セル内配置や位置調節のための値の最初のスペースなどをどうしたらよいか、そういう(18個のミシン目で区切られたマスの中に、体裁よく収まる)シートを作ってください。
1ラベルシールが出来れば、ある程度3列にコピー、8箇所コピで出来ると思う
(3)いつも、前の行の会社名(または会社コード)を保持する変数を1つ作ります
(4)データ第1行から最終行まで、以下を繰り返す
1行のデータにつき、ラベルシールの1枚分の各セルに会社情報を溜め込む
A.会社が同じで24枚以内なら、ラベルシートの1枚分の各セルに会社情報を溜め込む
右(または下。質問に書いてないよ)のラベルへ
1社分の情報を関係数セルに値をセット。横は3列だから4、7、10、・・には直下行に印刷情報のセット位置をずらす。(注)
縦は8個の列が
B.同じ会社でシール25枚目(、49枚目・・)になったら、まず今まで溜め込んだ、そのラベルシート1枚の該当範囲を印刷する。
そして印刷後その範囲をクリアする。
第1ポジションに今の会社(25番目など)情報をセット
以下繰り返し。
C途中で会社が変わったら今まで溜め込んだ情報だけにして、(空白
シール部分はあってもやむをえない)ラベルシート1枚分を印刷する。
そしてその範囲をクリアする。
ラベルの第1ポジションに対応するセル範囲に、今の会社(新会社の)情報をセット。以下直下行について繰り返し。
ーーー
(注)1ラベルの各18のラベルシールと対応するシートのセルが番号
(1-18)を指定するとうまく行くVBAコードが可能で、それを
やるとコードがすっきりすると思う。ラベルシールポジションを示すポインタ変数は必要。
そのためにポジションと項目ごと(会社名、会社住所など)を対応させる列・行の対応表を作るのが良さそう。
以下内容はでたらめ
ーーーーーーーーーー会社ーーー住所ーー代取
第1ポジション C3 C5 C6
第2ポジション E3 E5 E6
第3ポジション G3 G5 G6
第4ポジション C6 C8 C9
ポジションの対応表を作るとは眼から鱗でした。
imogasiさんの回答はいろいろなところで拝見し、参考にさせていただいています。
ありがとうございました。
No.1ベストアンサー
- 回答日時:
Word側で対応できると思いますよ。
(Excelのデータも少し編集あり)過去ログの
【 差込印刷で顧客別に複数行のデータを印刷する方法で困っています 】
http://oshiete1.goo.ne.jp/qa2844223.html
にある説明がわかりやすいかと思います。
わかりにくかったら補足しますので、一度トライしてみてください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- プリンタ・スキャナー Wordで作った宛名ラベルを印刷しようと思って、プリンターの上のところにある、手差しトレイ的なところ 3 2022/11/17 18:40
- Excel(エクセル) Excelについて教えてください。 帳票データがあります。 アクセスに取り込むため、 データ形式にし 1 2022/06/08 19:59
- Excel(エクセル) エクセルでキーリストからデータを取り出して1枚1枚印刷するには? 11 2022/06/27 09:52
- Excel(エクセル) エクセルの散布図で新たに入力した値のデータラベルが空欄になる現象 1 2022/04/26 09:31
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
- Excel(エクセル) 請求書と領収書の作成 4 2022/11/10 16:13
- その他(Microsoft Office) エクセルのマクロについて教えてください。 5 2023/01/21 09:39
- Excel(エクセル) [Excel2016] 相関表等の自動作成 2 2022/08/01 20:34
- 年賀状作成・はがき作成 エクセルで作った住所録をワードの差し込み印刷ではがきに印刷したい 3 2022/09/26 15:47
- Excel(エクセル) Excelで質問です! 現在マクロを勉強中の初心者です。 以下のような表から、会社名が空白のもの以外 2 2022/06/14 12:16
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
一点一葉とはどんな意味ですか?
-
エクセル宛名ラベルが重複する
-
ワードかエクセルで、KOKU...
-
ラベルの差込印刷で2ページ目以...
-
インデックスに印刷する方法
-
ピボットテーブルのΣ値のタイト...
-
VBA初心者です。コンパイルエラ...
-
ワード差し込み印刷:作成した...
-
CDやDVDの表面へのラベル...
-
エクセルでマイタックラベルへ...
-
宛名ラベルの「〒」「様」表示...
-
EXCEL:円グラフで、データラベ...
-
wordの差込印刷(ラベル作成)...
-
Excel VBAのフォーム_ラベルの...
-
<excel> 差し込み印刷ヘッダー設定
-
ゆうパックのお問い合わせ小包...
-
ラベル屋さんでひとつひとつの...
-
DVDのインデックスカードの自作
-
CDやDVDのラベルやジャケッ...
-
Accessのレポートで複数列の見...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ワードかエクセルで、KOKU...
-
一点一葉とはどんな意味ですか?
-
エクセル宛名ラベルが重複する
-
インデックスに印刷する方法
-
ラベルの差込印刷で2ページ目以...
-
フラットファイルの背表紙部分...
-
エクセルでマイタックラベルへ...
-
ピボットテーブルのΣ値のタイト...
-
筆王
-
ワード差込印刷 縦書き・横書き...
-
DVDのタイトルを変更したい
-
ワード差し込み印刷:作成した...
-
Wordで作った宛名ラベルを印刷...
-
ワードで宛名ラベルのフォント...
-
CDやDVDの表面へのラベル...
-
Excel VBAのフォーム_ラベルの...
-
wordでラベル差込印刷時に右端...
-
ラベル印刷ソフトで連番を一度...
-
宛名ラベル 2枚目以降が表示、...
-
ラベル屋さんでひとつひとつの...
おすすめ情報