エクセルの学校：全文検索：Hyper Estraier：差し込み印刷

Results of 1 - 1 of about 296 for 差し込み印刷 (0.002 sec.)

[[20030304231334]]: #score: 8241; @digest: 6561518cb1d109f572559ba28a1a17d1; @id: 1337; @mdate: 2003-04-29T06:48:25Z; @size: 2118; @type: text/plain; #keywords: 稿! (20299), 原稿 (7720), 刷的 (7380), 込デ (7096), 差込 (7034), 体上 (6058), 各a1 (5545), 示版 (3694), 〜z1 (3423), 込印 (3243), lastcol (3090), 田鈴 (2659), 枚目 (1953), 「差 (1827), 刷対 (1793), 印刷 (1487), 一枚 (1412), ク全 (1322), し込 (1286), ル一 (1019), 刷」 (978), 「印 (898), 数日 (888), 大体 (873), 蛇足 (872), 差し (828), み印 (821), 日前 (815), 鈴木 (759), 山田 (719), 上と (636), シー (579); 『セルに文字の打出し』（名無し153）
エクセルで、A1〜Z1の各セルに入れた名前を別のエクセルシートでA1のセル一つにに各A1〜Z1名前を一枚一枚に入れ、印刷できるか教えて下さい。具体的に言うと、 A1 B1 C1 D1 山田鈴木田中畑中このデータを ____________________ A1 山田 1枚目 ____________________ A1 鈴木 2枚目と言う風に出きるかということなのですが・・・。 ---- 仮にデータの入っているシート名を「原稿」とします。 AからZまでの26枚のシートを作成し、AシートのA1のセルに =原稿!A1 BシートのA1のセルに =原稿!B1、CシートのA1のセルに =原稿!C1 とZシートまで指定して、メニューの「ファイル」→「印刷」→「印刷対象」の「ブック全体」にチェックを入れて印刷すればできると思います。もし質問の意味を取り違えていたら、ごめんなさい。（すーさん） --------------------------- すーさんたぶん質問の意味を取り違えていると思います。 26枚のシートを作成し,各シートのA1にデータを設定すること自体が大変なのでそういうことではないような気がします。この質問はよくこの掲示版にもある「差し込み印刷」に関する質問になるかと思います。数日前にも似た質問がありました。「差し込み印刷」「差込」等で検索したらどうでしょうか。（なお） -------------------------- 単純なのでこの場合の差込印刷機能を作ってみました。データシートを表示して,下記VBAを実行すると,シート2（左から2枚目のシート）に差し込んで 1枚ずつ,データの最後まで印刷をします。（途中空欄があっても,空欄をいれて印刷してしまいます。）途中の停止機能はありませんので,最後まで待つか,CTRL+BREAK で止めてください。（なお） Sub test() lastcol = Cells(1, Columns.Count).End(xlToLeft).Column For i = 1 To lastcol Worksheets(2).Cells(1, 1) = Cells(1, i) ' 差込データが多い場合は上とおなじような感じで並べる。 '差込データが多い場合は上とおなじような感じで並べる。 Worksheets(2).PrintOut Next End Sub 蛇足です。よくある差込印刷的な機能は,差込印刷のレイアウトを別にすれば,大体上記のような単純なVBAで実現可能と思います。データ数（差込数）が多い場合は差し込むコードを同じように並べればいいだけです。 ...; https://www.excel.studio-kazu.jp/wiki/kazuwiki/200303/20030304231334.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ