今、A4版にピッタリおさまるように設定してあるエクセルがあって、
マクロの繰り返し処理で、
A1セルから始まって、A1+1=B1,B1+1=C1…というように、
常に「+1した数値」を右に9回繰り返し表示したら,
A2(次の行)に「+1した数値」を表示させなさい
というものを作成しているのですが…

A1の値が1だとすると、J1が10になりますね。
それで、右に9回繰り返し表示させたら…なので、
A1が1だとした場合には、J1に10を表示させた後、
A2に11と表示させるという設定をしてあります。

今、A4版にキッチリ納めるためには、
セル幅の都合、9回がJUSTとし、印刷しているのですが、
これを今日はB5版で印刷したいワ!というような場合には、
どのようにマクロを設定したら良いでしょうか。

B5版のシートを作って、繰り返す回数を9回ではなく、
少なめに設定すればできることは分かるのですが、
そうではなくて、
B5版なら7回繰り返す,A4版なら9回繰り返す,
B4版なら12回繰り返す…などなど
用紙によって、パッと設定を変えるなど…そんな贅沢は無理ですか?

意味不明かな…

このQ&Aに関連する最新のQ&A

A 回答 (1件)

ActiveSheet.PageSetup.PaperSize プロパティを利用すれば可能です。


例としては
Select Case ActiveSheet.PageSetup.PaperSize
Case xlPaperB5: cnt = 7
Case xlPaperB4: cnt = 12
Case xlPaperA4: cnt = 9
End Select

(cntは繰り返し回数)
ヘルプでPageSetupかPaperSizeで引けると思います。
    • good
    • 0
この回答へのお礼

やってみます。。。
ありがとうございました。

お礼日時:2001/07/20 13:28

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング

おすすめ情報

カテゴリ