| |
|
|
Sample Macro コントロール・コマンドボタン |
 |
|
|
|
9-1) コマンドボタンの色を変える |
 |
 |
'=========================================================================================
' ◆ユーザーフォームのコード◆
'-----------------------------------------------------------------------------------------
Private Sub UserForm_Initialize() '※1
CommandButton1.BackColor = RGB(0, 255, 0) '※2 コマンドボタンの背景色を変える
CommandButton1.ForeColor = RGB(255, 0, 0) '※2 コマンドボタンの文字の色を変える
End Sub
'=========================================================================================
＜コメント＞
※1 Initializeイベントは、ユーザーフォームが開かれたときに発生する
※2 BackColorプロパティ、ForeColorプロパティの値を設定して色を変える
くわしくはサンプルブックの「解説」シートを参照
サンプルブックのダウンロードは ここをクリック （YNxv239_CommandButton_Color.xls 41KB）
※ 一旦、ブックをハードディスクに保存し、開き直してから実行してください。
|
|
9-2) コマンドボタンの表示を変える |
|
|
'=========================================================================================
' ◆ユーザーフォームのコード◆
'-----------------------------------------------------------------------------------------
Private Sub UserForm_Initialize() '※1
CommandButton1.Caption = "はい" '※2
CommandButton1.ControlTipText = "よく確かめてからクリックしてネ"※3
End Sub
'=========================================================================================
＜コメント＞
※1 Initializeイベントは、ユーザーフォームが開かれたときに発生する
※2 Captionプロパティで、ボタンに表示する文字列を設定する
※3 ControlTipTextプロパティで、マウスポインタをボタンの上に置いたときに表示する文字列を設定
くわしくはサンプルブックの「解説」シートを参照
サンプルブックのダウンロードは ここをクリック （YNxv239_CommandButton_Hyoji.xls 41KB）
※ 一旦、ブックをハードディスクに保存し、開き直してから実行してください。
|
|
