EXCELで作成した表を印刷したいのですが、表が縦長で複数ページにわたります。
そこで各ページの下端にそれぞれ罫線を挿入するマクロを書きたいのですが、
改ページ位置の取得方法がわかりません。各ページの上端行でも下端行でも良いので
行番号を取得する方法はないものでしょうか?
どなたかご教授願います。
マクロ全体としては下記を考えています。
1.データの下端行の取得
2.印刷範囲の設定(横1ページ×縦複数ページ)
3.最初の改ページ位置の取得
4.ページ下端セル行の下に罫線を入れる
5.次の改ページ位置の取得
6.以下、データ最下端行まで繰り返し
(各行のセルの高さは一定ではないです。)
No.1ベストアンサー
- 回答日時:
難しく考えず、フッターを使ったらいかがでしょう。
フッターの1行目をスペースで連打し、フォントの設定で下線を選びます。
これで下線が表示され、丁度データと境になるのではないですか?
どうしても改ページ位置取得なら、HPageBreakオブジェクトのLocationプロパティを使ってみたらどうでしょう。
HPageBreaks (HPageBreakオブジェクトのコレクション)
ActiveSheet.HPageBreaks.Count (改ページ総数)
ActiveSheet.HPageBreaks(1).Location.Row (一番目の改ページの行)
Location.Rowで改ページの行が分ります。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
推しミネラルウォーターはありますか?
推しミネラルウォーターがあったら教えてください
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
EXCEL-VBAで印刷時のページ番号を取得したい
Excel(エクセル)
-
VBAでページ番号、ページ最終行を取得する方法
その他(プログラミング・Web制作)
-
Excelのマクロについて
Visual Basic(VBA)
-
-
4
Excel 改ページのVBAうまくいかないです
Excel(エクセル)
-
5
エクセルのページ区切り(点線)の位置をマクロで取得 ※印刷範囲クリア
Excel(エクセル)
-
6
vba 改ページカウントで不可解なエラーを回避したいのですが教えてください
Excel(エクセル)
-
7
エクセルVBA テキストボックスに3桁ごとにコンマ
Visual Basic(VBA)
-
8
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
9
ExcelVBA Range クラスの PageBreak プロパティを設定できません。
Visual Basic(VBA)
-
10
エクセルのページをシートごとに自動分割するやり方について(列、行ともに同一に)
Excel(エクセル)
-
11
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
12
excel印刷で改頁をする時に罫線を引きたいのですが、良い方法ありますか?
Excel(エクセル)
-
13
EXCEL VBAでHPageBreaks
Excel(エクセル)
-
14
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
15
VBAでの改ページ位置の変更
Excel(エクセル)
-
16
エクセルマクロで「1」を「01」に変換したい
Excel(エクセル)
-
17
VBAでユーザーフォームの表示を確認
Visual Basic(VBA)
-
18
エクセルVBA 配列からセルに「関数式」を一気代入したい
Visual Basic(VBA)
-
19
VBAでの[]
Visual Basic(VBA)
-
20
条件付き書式で最終行に線を引きたい
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ミュージックのアートワークを...
-
Yahoo! JAPAN IDを新規取得でき...
-
ps3で久しぶりにCDの音楽情報取...
-
(Win32)ファイルパスから物理ド...
-
VBAでPDFファイルの文書のプロ...
-
Perlで基本認証を済まし、ペー...
-
「取得先」という表現について
-
IPアドレスとMACアドレスを取得...
-
APIから取得した情報の文字化け...
-
アクセスの度にIPアドレスを変...
-
作りたいプログラムがあります
-
format関数について
-
PHP の cURL で、htmlを画像へ...
-
【PHP】SESSION変数の競合を...
-
excel access連携 このテーブル...
-
バッチファイルでpingの結果を...
-
【C#】DataGridViewの最大列数...
-
<A href ~で複数の値を渡したい
-
VBA コレクションに2次元配列...
-
findstrのerrorlevel
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
「取得先」という表現について
-
Yahoo! JAPAN IDを新規取得でき...
-
ps3で久しぶりにCDの音楽情報取...
-
ローカルのコンピュータ名を取...
-
築24年の中古住宅は住宅ローン...
-
VBAでPDFのアクティブページ番...
-
EXCEL、マクロ-改ページ行番号...
-
Excel VBA:特定の文字列以降(...
-
ミュージックのアートワークを...
-
format関数について
-
【VBA】EXCELブックを開かずに...
-
アクセスの度にIPアドレスを変...
-
積立投資してます。現在平均取...
-
VB or VBScriptでPCの製造番号...
-
C#で特定LANアダプタの状態を取...
-
VBAでできますか?
-
IPアドレスとMACアドレスを取得...
-
表示している画面サイズの取得方法
-
VBS「開いているページ」のURL...
-
IEを使わないでhtmlテキストを...
おすすめ情報