質問編集履歴

4

追記

2021/11/18 01:35

投稿

mnbwqz
mnbwqz

スコア74

test CHANGED
File without changes
test CHANGED
@@ -104,11 +104,9 @@
104
104
 
105
105
 
106
106
 
107
- 改ページされる時点をVBAで認識する方法は無いでしょうか。
107
+ 改ページされる時点をVBAで認識する方法は
108
108
 
109
- →[こちら](https://hatenachips.blog.fc2.com/blog-entry-70.html)
109
+ →[こちら](https://hatenachips.blog.fc2.com/blog-entry-70.html)を参考にして認識し、各ページ最終行の一番下の罫線を引けました。
110
-
111
- を参考に、認識し、各ページ最終行の一番下の罫線を引く方法を考えます。
112
110
 
113
111
 
114
112
 
@@ -124,6 +122,4 @@
124
122
 
125
123
 
126
124
 
127
- 改ページする場合に、改ページをVBAで認識し、その場合に下線を引くようにはできないでしょうか。ページフッター(一番下の薄い色の線)を引く方法では、下図のように詳細セクションの最終行の間に隙間できす。よろくお願いします
125
+ 改ページする場合に、改ページをVBAで認識する方法も「こちら」ページの情報を参考に線を引くとが出来まし
128
-
129
- ![イメージ説明](91478ce1203a4d8c63d6dbccf306b00c.jpeg)

3

追記

2021/11/18 01:35

投稿

mnbwqz
mnbwqz

スコア74

test CHANGED
File without changes
test CHANGED
@@ -106,6 +106,12 @@
106
106
 
107
107
  改ページされる時点をVBAで認識する方法は無いでしょうか。
108
108
 
109
+ →[こちら](https://hatenachips.blog.fc2.com/blog-entry-70.html)
110
+
111
+ を参考に、認識し、各ページ最終行の一番下の罫線を引く方法を考えます。
112
+
113
+
114
+
109
115
  (以下詳細)
110
116
 
111
117
 

2

追記

2021/11/17 12:40

投稿

mnbwqz
mnbwqz

スコア74

test CHANGED
File without changes
test CHANGED
@@ -96,9 +96,7 @@
96
96
 
97
97
  ご回答ありがとうございます。
98
98
 
99
- [Access - Access2016:印刷時拡張で高さの拡がったテキストボックスに合わせて自動的に他のテキストボックスの高さも拡げたい|teratail]
99
+ [Access - Access2016:印刷時拡張で高さの拡がったテキストボックスに合わせて自動的に他のテキストボックスの高さも拡げたい|teratail](https://teratail.com/questions/84083)
100
-
101
- (https://teratail.com/questions/84083)
102
100
 
103
101
  を参考にしてレポートを作成しています。
104
102
 
@@ -106,4 +104,20 @@
106
104
 
107
105
 
108
106
 
109
- 縦罫線をVBAで、横罫線を詳細セクションに配置という方法では自動でレイアウトが変更され、想定通りにならないところがありました。データの中にはセル(テキストボックス)の背景に色を付けものがあり(テキストボックスの背景色の設定で色付ける方法では、VBAで引いた線の部分にまで背景色がはみ出てくることもあり)、全ての枠線をVBAの四角形を描画する方法で作成する方法も試しています。その場合、改ページする場合の最後の下線、データが最後の場合の下線以外引けました。改ページする場合、データが最後の場合をVBAで判断し、その場合に下線を引くようにはできないでしょうか。
107
+ 改ページされる時点をVBAで認識する方法はいでしょうか。
108
+
109
+ (以下詳細)
110
+
111
+
112
+
113
+ 縦罫線をVBAで、横罫線を詳細セクションに配置という方法では自動でレイアウトが変更され(詳細セクションの幅が自動的に+0.026cmされる)、想定通りにならないところがありました。
114
+
115
+
116
+
117
+ データの中にはセル(テキストボックス)の背景に色を付けるものがあり(テキストボックスの背景色の設定で色を付ける方法では、VBAで引いた線の部分にまで背景色がはみ出だす大きさになる)、全ての枠線をVBAの四角形を描画する方法で作成する方法も試しています。サブレポートでの各商品のデータ件数の量に応じ、縦罫線を伸ばさないといけない点・下罫線が移動する点、については、サブレポートの件数に応じて縦罫線を伸ばす・下罫線を移動させる方法で対応できたので、データの最後の部分の下の線は引けました。
118
+
119
+
120
+
121
+ 改ページする場合に、改ページをVBAで認識し、その場合に下線を引くようにはできないでしょうか。ページフッターに下線(一番下の薄い色の線)を引く方法では、下図のように詳細セクションの最終行との間に隙間ができます。よろしくお願いします。
122
+
123
+ ![イメージ説明](91478ce1203a4d8c63d6dbccf306b00c.jpeg)

1

追記

2021/11/17 10:31

投稿

mnbwqz
mnbwqz

スコア74

test CHANGED
File without changes
test CHANGED
@@ -12,7 +12,7 @@
12
12
 
13
13
  テキストボックス・サブレポートのプロパティは、
14
14
 
15
- 高さ・上位置・背景線スタイル(実)・境界線幅(1ポイント)同一です。
15
+ 高さ・上位置・背景線スタイル(実)・境界線幅(1ポイント)同一です。
16
16
 
17
17
  しかし、サブレポートの部分のみ、一回り小さく線が引かれてしまいます。
18
18
 
@@ -87,3 +87,23 @@
87
87
  線を引きたい部分を黄色表示
88
88
 
89
89
  ![希望](8ef1cc59750f2c491b0303bc0e2965af.jpeg)
90
+
91
+
92
+
93
+
94
+
95
+ (追記)
96
+
97
+ ご回答ありがとうございます。
98
+
99
+ [Access - Access2016:印刷時拡張で高さの拡がったテキストボックスに合わせて自動的に他のテキストボックスの高さも拡げたい|teratail]
100
+
101
+ (https://teratail.com/questions/84083)
102
+
103
+ を参考にしてレポートを作成しています。
104
+
105
+ 黄色の部分のみ、VBAで線を引くというのはできなそうでした。
106
+
107
+
108
+
109
+ 縦罫線をVBAで、横罫線を詳細セクションに配置という方法では自動でレイアウトが変更され、想定通りにならないところがありました。データの中にはセル(テキストボックス)の背景に色を付けるものがあり(テキストボックスの背景色の設定で色を付ける方法では、VBAで引いた線の部分にまで背景色がはみ出てくることもあり)、全ての枠線をVBAの四角形を描画する方法で作成する方法も試しています。その場合、改ページする場合の最後の下線、データが最後の場合の下線以外は引けました。改ページする場合、データが最後の場合をVBAで判断し、その場合に下線を引くようにはできないでしょうか。