Microsoft Access 掲示板

レポート内の四角形の背景をVBAで指定したい / 3

7 コメント
views
4 フォロー
3
hiroton 2022/09/30 (金) 15:26:06 25049@f966d

印刷することまで考えてきれいに出したいなら2つ目の手法なら
文字書式:リッチ テキスト形式
コントロールソース:

="<font style='BACKGROUND-COLOR:#" & IIf([社員区分]="派遣社員","FFFF00","FFFFFF") & "'>   </font>"

フォント名:MS ゴシック
フォントサイズ:100
その他余白等は0にする

実際に表示させている文字は全角スペース3つです


VBAならボックスのままでいいのでフォーマット時イベントで背景色を変更

Private Sub 詳細_Format(Cancel As Integer, FormatCount As Integer)
    Me!ボックス.BackColor = IIf(Me!社員区分 = "派遣社員", 62207, 16777215)
End Sub

上の手法は、あくまでも表示されている文字の背景部分の色なので、余白部分とか望んだ結果にならない場合があります

VBAはいろいろ柔軟に対応できますが、出来ることが多すぎてコードが増えるほど難解なシステムになるので使わなくていい部分には使わないようにしたいという気持ちがhirotonにはあります
後ついでに、フォーマット時イベントはレポートビューだと発生しないとかの違いもありますね

通報 ...