Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


9023 / 76732 ←次へ | 前へ→

【73277】Re:繰り返し処理について
発言  UO3  - 12/12/16(日) 22:36 -

引用なし
パスワード
   ▼ひまこ さん:

こんばんは

印刷の件。
1ページ目(たぶん、コピペした最初のブロック、つまり44行目からということですよね)
というのは、シートの印刷上は2ページ目ですよね。
で、1月なら2ページ目、3月なら4ページ目と考えましょう。

たとえばできあがったシートで5ページ目を印刷する操作をマクロ記録しますと

Sub Macro1()
'
' Macro1 Macro
'

'
  ActiveWindow.SelectedSheets.PrintOut From:=5, To:=5, Copies:=1, Collate _
    :=True, IgnorePrintAreas:=False
End Sub

こんなコードが生成されます。
このコードのFrom:=5, To:=5 の 5 がページ番号。
ですから、まずInputBox関数やInputBoxメソッド(後者がおすすめです)で、月の数字を
入力させます。で、その入力された月の+1 が印刷すべきページということになります。
この入力結果を変数で受けておいて

From:=その変数, To:=その変数 としてやれば、目的のページが印刷されます。
ご自分でトライできそうですね。
がんばってください。もし、壁にぶつかったらSOSを出してください。
228 hits

【73267】繰り返し処理について ひまこ 12/12/16(日) 0:33 質問
【73271】Re:繰り返し処理について UO3 12/12/16(日) 7:11 発言
【73272】Re:繰り返し処理について ひまこ 12/12/16(日) 10:12 発言
【73273】Re:繰り返し処理について UO3 12/12/16(日) 10:56 発言
【73275】Re:繰り返し処理について ひまこ 12/12/16(日) 21:38 質問
【73277】Re:繰り返し処理について UO3 12/12/16(日) 22:36 発言
【73278】Re:繰り返し処理について UO3 12/12/16(日) 22:40 発言
【73282】Re:繰り返し処理について ひまこ 12/12/17(月) 6:23 お礼
【73287】Re:繰り返し処理について ひまこ 12/12/17(月) 22:00 お礼
【73286】Re:繰り返し処理について 12/12/17(月) 21:49 発言
【73288】Re:繰り返し処理について ひまこ 12/12/17(月) 22:04 質問
【73291】Re:繰り返し処理について 12/12/18(火) 6:32 発言
【73301】Re:繰り返し処理について ひまこ 12/12/18(火) 21:17 お礼
【73276】Re:繰り返し処理について 12/12/16(日) 21:59 回答
【73281】Re:繰り返し処理について ひまこ 12/12/17(月) 6:21 お礼
【73289】Re:繰り返し処理について ひまこ 12/12/17(月) 23:24 質問
【73292】Re:繰り返し処理について 12/12/18(火) 6:34 回答
【73302】Re:繰り返し処理について ひまこ 12/12/18(火) 21:19 お礼
【73311】Re:繰り返し処理について 12/12/19(水) 18:48 回答
【73298】Re:繰り返し処理について UO3 12/12/18(火) 12:42 発言
【73303】Re:繰り返し処理について ひまこ 12/12/18(火) 21:29 お礼

9023 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free