
初心者です。いろいろ調べてみて、ここまでたどりつきましたが(どなたかの質問を参考に)、これ以上わからなくなったのでこちらに投稿しました。
Private Sub 詳細_Print(Cancel As Integer, PrintCount As Integer)
Me.ScaleMode = 1
Me.ForeColor = 0
'一番左の縦線
Me.Line (0, 120)-(0, 6680)
End Sub
上記のコードで、罫線を引く方法はわかりました。ただ、私がやりたいことは、全てのレコードに対して線を引く方法でなく(それであれば、VBAを使うほどでもないので)、特定の位置に線を引く方法なのです。
もっとわかりやすく言うと、A4用紙に2つのレコードが印刷されるレポートになっております。その2つのレコードの真ん中に、いつも線を引く、ということをさせたいのです。
(要するに、切り取り線です)
このような場合、どうしたら可能になるか、どなたかヒントをいただけないでしょうか。
No.2ベストアンサー
- 回答日時:
LINEは論理的な位置ではなく、物理的な位置に線を引くだけです。
わたしが言う論理的とは、レコードの内容によってや、レコードの画面における出現数(2つおき)などによって(レコードの内容や数に関連づけて)線を引くようなことを言ってます。
これらは両者を結びつけた位置を計算して、直線を描くのは難しいでしょう。
ですから別の方のことの知識を得ないといけないとおもいます。
>、罫線を引く方法はわかりました
は、質問者のニーズに限って言えば、外れていると思います。
ーー
2レコード分の印刷レイアウトを上下に、1レコード分ずつ配置する設計を考え、真中にツールバーの直線(プロパティの指定で点線・太さ指定・色指定もあります)で引けばよいでしょう。
ーーー
しかし
アクセスのレポートでは、レコード処理はアクセス任せが標準なので、単純な1行ー1レコード明細印刷以外は、やさしくないと思う。
>レポート1ページに2レコード表示したい 、のほうが初心者には難しいのでは。
レポートの「オートレポートの単表形式」で「詳細」の高さ(1レコード分)を1ページの半分程度に拡げて、1ページ2レコード印刷にして、詳細で1レコード分の下のほうに直線を引いておくと
明細(奇数番レコード)
ーーー
明細 (偶数番レコード)
ーーー
になって下にも線が出てしまう。
そのため、これ以外の方法が無いか、あらためて質問したらどうですか。
どうもありがとうございます。わかりました。
もしかしたら私の書き方が間違っていたかも、という箇所があったのですが、それは2レコードを表示させる、と書いたことです。
1ページに、2ページ分が表示される、ということを意味して書きました。
おそらく書き方が悪かったと思いましたので、お詫びして訂正します。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【VBA】Excelで罫線を引きたい 3 2022/07/14 12:04
- Excel(エクセル) エクセルで同じ数字同士を自動で線で結ぶVBAを教えてください 6 2022/04/26 23:13
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Visual Basic(VBA) Accessフォームで全レコードを指定のExcelのセルへ転送し印刷する方法について 2 2022/09/08 18:23
- Visual Basic(VBA) VBAについて教えてください 4 2022/11/10 12:44
- Visual Basic(VBA) VBA 罫線について B列3行目から21行毎にデータがはいります。 データがはいったらデータが入った 6 2022/11/15 17:22
- Excel(エクセル) 【マクロ】スクショ印刷がうまく動かない件 5 2022/12/06 17:37
- Excel(エクセル) vba セルの罫線について教えてください 2 2022/12/28 17:14
- Visual Basic(VBA) ①ExcelVBAでカレンダーを作り、別のユザーフォームで日付を入力したいのですがエラーになります。 1 2023/02/17 18:39
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
このQ&Aを見た人はこんなQ&Aも見ています
-
あなたの「必」の書き順を教えてください
ふだん、どういう書き順で「必」を書いていますか? みなさんの色んな書き順を知りたいです。 画像のA~Eを使って教えてください。
-
何回やってもうまくいかないことは?
みなさんには、何回やってもうまくいかないことはありますか?
-
もし10億円当たったら何に使いますか?
みなさんの10億円プランが知りたいです!
-
洋服何着持ってますか?
洋服を減らそうと思っているのですが、何着くらいが相場なのかわかりません。
-
「これいらなくない?」という慣習、教えてください
現代になって省略されてきたとはいえ、必要性のない慣習や風習、ありませんか?
-
AccessからExcelに罫線付で出力したい
Excel(エクセル)
-
アクセスのオートレポートで罫線の引き方について
その他(データベース)
-
Access サブフォームでの選択行の取得
その他(データベース)
-
-
4
ACCESSのレポートの罫線・・・?
Access(アクセス)
-
5
AccessVBAでExcelを起動し、罫線を引きたいのですが、Exc
Visual Basic(VBA)
-
6
ACCESSの表で罫線を使うと縦方向が繋がらない
その他(プログラミング・Web制作)
-
7
アクセスのレポートに、フォームで算出した数字を表示させたい
Access(アクセス)
-
8
Accessでテーブルの値をテキストボックスに代入するには?
Access(アクセス)
-
9
Access2003 クエリで、空の列は作れますか?
Access(アクセス)
-
10
Accessレポートに表を入れたい
Excel(エクセル)
-
11
Accessで文字列の長さによって、フィールドの幅を自動で合わせる方法
Excel(エクセル)
-
12
Accessでの置換
Access(アクセス)
-
13
Access印刷プレビューでデータが表示されない
PowerPoint(パワーポイント)
-
14
アクセスで入力したデータの順番が変わってしまいます
その他(ビジネス・キャリア)
-
15
アクセスでレポートの1印刷内に複数のレコードを表示させたい
Visual Basic(VBA)
-
16
Accessの画面更新を一時的に停止する方法。
その他(データベース)
-
17
アクセスVBAで、フォームの値をレポートに代入したい
Access(アクセス)
-
18
VBAでレポート(Access)に線を引く(点線)
Excel(エクセル)
-
19
Accessのレポートでデータがなくても罫線だけ表示させたい
Excel(エクセル)
-
20
アクセスのフォームで、文字を中央揃えにしたい
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・思い出すきっかけは 音楽?におい?景色?
- ・あなたなりのストレス発散方法を教えてください!
- ・もし10億円当たったら何に使いますか?
- ・何回やってもうまくいかないことは?
- ・今年はじめたいことは?
- ・あなたの人生で一番ピンチに陥った瞬間は?
- ・初めて見た映画を教えてください!
- ・今の日本に期待することはなんですか?
- ・【大喜利】【投稿~1/31】『寿司』がテーマの本のタイトル
- ・集中するためにやっていること
- ・テレビやラジオに出たことがある人、いますか?
- ・【お題】斜め上を行くスキー場にありがちなこと
- ・人生でいちばんスベッた瞬間
- ・コーピングについて教えてください
- ・あなたの「プチ贅沢」はなんですか?
- ・コンビニでおにぎりを買うときのスタメンはどの具?
- ・おすすめの美術館・博物館、教えてください!
- ・【お題】大変な警告
- ・【大喜利】【投稿~1/20】 追い込まれた犯人が咄嗟に言った一言とは?
- ・洋服何着持ってますか?
- ・みんなの【マイ・ベスト積読2024】を教えてください。
- ・「これいらなくない?」という慣習、教えてください
- ・今から楽しみな予定はありますか?
- ・AIツールの活用方法を教えて
- ・最強の防寒、あったか術を教えてください!
- ・【大喜利】【投稿~1/9】 忍者がやってるYouTubeが炎上してしまった理由
- ・歳とったな〜〜と思ったことは?
- ・モテ期を経験した方いらっしゃいますか?
- ・好きな人を振り向かせるためにしたこと
- ・スマホに会話を聞かれているな!?と思ったことありますか?
- ・それもChatGPT!?と驚いた使用方法を教えてください
- ・見学に行くとしたら【天国】と【地獄】どっち?
- ・これまでで一番「情けなかったとき」はいつですか?
- ・この人頭いいなと思ったエピソード
- ・あなたの「必」の書き順を教えてください
- ・14歳の自分に衝撃の事実を告げてください
- ・人生最悪の忘れ物
- ・あなたの習慣について教えてください!!
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ワードの差し込み文書で困って...
-
7インチ(CD?)って・・・
-
差込印刷での条件指定
-
レコードの波打ちを直す方法を...
-
エクセルからアクセスにデータ...
-
GLAYが移籍?
-
GoToRecordで実行時エラー '2105'
-
ポールとポーラ
-
浜田 省吾さんの奥さんって
-
禁止マークのレコードと三角マ...
-
(C)は著作権、(R)は商標...
-
【至急!】差し込み印刷を使用...
-
A面B面って人間で言うとどうい...
-
アクセスのレポート、VBAで罫線...
-
音楽CDは何時から一般に普及...
-
VBAでレコードセットの総レコー...
-
マリア,マーテル グラッチェの...
-
ワード2003 Nextレコード...
-
エクセルVBAでアクセスの任意の...
-
お教えください。 jimdo フリー...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ワードの差し込み文書で困って...
-
レコードの波打ちを直す方法を...
-
7インチ(CD?)って・・・
-
エクセルからアクセスにデータ...
-
(C)は著作権、(R)は商標...
-
差込印刷での条件指定
-
VBAでレコードセットの総レコー...
-
【至急!】差し込み印刷を使用...
-
Access クエリの結果が0件だっ...
-
今の時代でもCDを買う人はいる...
-
マリア,マーテル グラッチェの...
-
アクセスのレポート、VBAで罫線...
-
浜田 省吾さんの奥さんって
-
エクセルVBAでアクセスの任意の...
-
GoToRecordで実行時エラー '2105'
-
Accessのレポートについ...
-
ポールとポーラ
-
20世紀少年について
-
GLAYが移籍?
-
ワード2003 Nextレコード...
おすすめ情報