Accessのコマンドボタンについて

質問

Accessのコマンドボタンのプロパティには、
背景色の設定がありません。
ネットで検索すると、２つの方法を発見しましたが、
問題が発生します。
以下２つの方法以外に、背景色の設定ができますでしょうか？

【１つ目】
・方法
　コマンドボタンのピクチャプロパティで、
　ビットマップを設定することです。
・問題点
　標題より、ピクチャが前面に出るので、標題が見えない！
　（大問題です）

【２つめ】
・方法
　ActineXのmicrosoftformsのボタンを使う
・フォントサイズを設定できない！
　（大問題です）

回答No.5

venzou · ベストアンサー

ラベルだとフォーカスを移動できないので、

・コマンドボタンの[書式]→[透明]を「はい」にして、見えなくする。
・色を付けたラベルの上に重ねる。
・フォーカスが移動してきた時に分かるように、ラベルのフォントや、色を変更する。
・マウスのDown、Upでラベルの立体表示を変更。

Private Sub コマンド0_Click()
　MsgBox "コマンド実行"
End Sub

Private Sub コマンド0_Enter()
　Me.ラベル0.FontUnderline = True
End Sub

Private Sub コマンド0_Exit(Cancel As Integer)
　Me.ラベル0.FontUnderline = False
End Sub

Private Sub コマンド0_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
　Me.ラベル0.SpecialEffect = 2
End Sub

Private Sub コマンド0_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
　Me.ラベル0.SpecialEffect = 1
End Sub

これだと、[Tab]で移動して[Enter]で実行なども出来ます。

お礼

本当に、ありがとうございます。
これなら、誰が見てもボタンです。