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

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

[[20200907132055]]: #score: 8241; @digest: a70354bff9cd3178b7dfa32512893b1d; @id: 85065; @mdate: 2020-09-07T06:25:58Z; @size: 1660; @type: text/plain; #keywords: ル差 (10493), maxnum (7145), 算wo (6721), プwo (6235), ブプ (5028), 力ca (5027), な子 (4888), トne (3974), のg3 (2950), 刷2 (2935), を18 (2428), 得fo (2039), 184 (2001), 枚目 (1953), はf1 (1900), activeprinter (1807), プリ (1731), 枚印 (1683), 印刷 (1487), （ok (1459), け印 (1381), ンタ (1155), calculate (1085), トア (980), リン (881), 月) (793), クテ (769), トプ (733), ィブ (706), 2020 (681), 刷し (644), アク (630); 『セルの値の分だけ印刷したい』（きな子）
Sheet1のG3セルの値の分だけ印刷したいです。印刷するのはSheet2で、Sheet2のF1セルに数字を入れて印刷したいです。例えばSheet1のG3の値が184だとしたら、 Sheet2を184枚印刷したいのですが、 Sheet2のF1セルに1から184まで順番に入力してから印刷としたいです。 1枚目はF1セルに1と入力してから印刷 2枚目はF1セルに2と入力してから印刷この作業を184枚目までしたです。よろしくお願いします。＜使用 Excel:Excel2010、使用 OS:Windows10 ＞ ---- エクセル 差し込み印刷 エクセル 差し込み印刷 VBA で過去ログ検索してみてください。（OK） 2020/09/07(月) 13:30 ---- すいません。マクロはマクロの記録しかやった事がないもので全然わかりません。宜しくお願い致します。（きな子） 2020/09/07(月) 14:21 ---- Wordの差し込み印刷は試しましたか? （OK） 2020/09/07(月) 14:28 ---- すいません。 Wordは使っていません。エクセルのみで行いたいです。宜しくお願い致します。（きな子） 2020/09/07(月) 14:48 ---- マクロではこんな感じです。意味やマクロの設定は調べてみてください。 Sub test() Dim i As Integer Dim maxnum As Integer maxnum = Worksheets("Sheet1").Range("G3").Value '最大値取得 For i = 1 To maxnum 'ループ Worksheets("Sheet2").Range("F1").Value = i '数値をセルに入力 Calculate '再計算 Worksheets("Sheet2").PrintOut 'シートプリントアウト Next i End Sub （OK） 2020/09/07(月) 14:52 ---- アクティブプリンターが指定のプリンターでない場合は、事前ににアクティブプリンターを変えるか、マクロでアクティブプリンターを変える、あるいは、プリントアウトの際にプリンターを指定してやる必要があります。 Application.Activeprinter で調べてみてください。（OK） 2020/09/07(月) 15:25 ...; https://www.excel.studio-kazu.jp/wiki/kazuwiki/202009/20200907132055.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ