エクセルの学校：全文検索：Hyper Estraier：フォーマット　自動　印刷

Results of 1 - 1 of about 103 for フォーマット　自動　印刷 (0.009 sec.)

フォーマット (1423), 自動 (14517), 印刷 (5709)

[[20061017114803]]: #score: 8137; @digest: 44b3c40f1f2e914263d0f54381f89735; @id: 25915; @mdate: 2007-03-12T01:59:20Z; @size: 3691; @type: text/plain; #keywords: matta (12977), mysu (12544), mangoos (12263), 頁数 (11037), msexcel (9178), closeup (7282), computer (6892), 左） (5682), 般操 (5544), リメ (4660), トア (3920), allabout (3899), イエ (3526), プリ (2472), （左 (2351), に& (2061), ヘッ (1990), selectedsheets (1880), ッダ (1795), 連番 (1771), printout (1691), アウ (1485), ウト (1434), リン (1259), 枚数 (1241), にプ (1187), 一般 (1061), activewindow (1025), ント (888), inputbox (773), 右上 (755), 如何 (749); 『1枚のシートで複数の枚数をプリントアウトするときに…』（みかん）
教えてください! 1枚のシートでフォーマットを作ったのですが、右上に番号を連番でつけていきたいのです。今のところ、100枚以上プリントアウトしないといけないので、自動的にプリントアウトするごとに、連番をつけていきたいのですが、そのようなことは出来るのでしょうか? 教えてください! エクセルのバーションは Excel2003です。お願いします!!! ---- すごい勢いなので圧倒されますがプリントアウトするたびにインクリメント!! だと思います。(VBAですが) 一般操作では出来るかどうかわかりません。 (Matta) ---- ＞matta さんすいません…m(_ _)m 焦って、改行せず…威圧的でしたね… やはり一般操作では無理でしょうか? (VBAとは…ビジュアルベーシックのこと?ですか?）みかん ---- イエイエとんでもありません。 VB=VBAではありませんが,エクセルで言うマクロです。 >自動的にプリントアウトするごとに、連番をつけていきたいのですがと書かれていたので。プリントアウトするたびにインクリメント(数を+1)していけば連番になると思います。プリントアウトの所をマクロで作成すればと思っただけです。一般操作なら他の識者の方のレスをお待ち下さい。 (Matta) ---- sub test() dim i for i = 1 to cells(1,9) ActiveWindow.SelectedSheets.PrintOut next i end sub セルの 1row,9colum にプリントしたい頁数を入力して実行する場合の例ですが如何でしょうか? mr_mangoos ---- 申し訳ありません。上記では正しく動作しません。取り消させてください。 mr_mangoos ---- sub test() dim i,j j=cells(1,9) for i = 1 to j cells(1,9)=i ActiveWindow.SelectedSheets.PrintOut next i end sub 再びですセルの 1row,9colum にプリントしたい頁数を入力して実行する場合の例ですが如何でしょうか? mr_mangoos ---- ひょっとして! ヘッダーの右に &P の事かな!? (Matta) ---- ＞mr_mangoos さん …すいません…どこにこのプログラムを打ち込めば… よいのでしょう… プログラミングはさっぱりわからないんですm(_ _)m >Matta さんヘッダーの上に&pは、ページが1枚だと、何枚プリントアウトしても『1』しか表記されないんです… これが連番になってくれるとよいのですが… みかん ---- マクロで出来ますがその前に印刷するデータをどの様にして印刷用のシートに持ってきてますか? 範囲を選択してコピー貼り付けとか,マクロで自動でとか 100枚位あればこの作業も大変だと思うのですが。 (Matta) ---- EXCELでツール（左クリック）→マクロ→VISUAL BASIC EDITR（左）→VBAプロジェクト（左）でVBAの画面が出ます。そしたら、挿入（左）→標準モジュール（左）でコーディング用の白いパネルが表れますのでそこにコピーして貼付けて下さい。実行は Alt+F8 でいいと思います。選択画面が出たら、testを選択すればいいでしょう。プログラムはテストしていませんので、2ページぐらいを指定して実行してみてください。 mr_mangoos ---- 了解しました。やってみます。教えて頂いてありがとうございました!!! みかん ---- もしよかったらこの方法を使いたいと思うのですがいまいち素人で使い方がよく分かりません簡単に押して頂くことは出来ないでしょうか? ---- 参考になると思います。作成したマクロをボタンに登録してみよう! http://allabout.co.jp/computer/msexcel/closeup/CU20060525A/index2.htm ボタンにマクロを登録しよう（その2） http://allabout.co.jp/computer/msexcel/closeup/CU20061225A/index.htm (MARBIN) ---- inputboxで入力右ヘッダーにシート名数です。（kohe) Option Explicit Sub mikan() Dim i As Long Dim mysu As String mysu = InputBox("印刷枚数を入力して OK で印刷開始", , 1) On Error Resume Next If mysu = "" Then Exit Sub For i = 1 To mysu If Err.Number = 13 Then Exit Sub With ActiveSheet .PageSetup.RightHeader = "&A " & i & "/" & mysu .PrintOut End With Next End Sub 10:58 ちょっと修正^^; ...; https://www.excel.studio-kazu.jp/wiki/kazuwiki/200610/20061017114803.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ