{"text_format":"1","workbook":"xlsx","n_sheets":1,"sheets":["Sheet1"],"not_rendered":{"charts":0,"images":5,"macros":1,"external_links":0,"defined_names":0,"comments":0,"pivot_tables":0},"unopened":[],"bounds":{"document_bytes":16777216,"sheet_cells":100000,"rows_first":2000,"rows_last":500,"rows_between":2000,"halvings":0,"cell_chars":16384,"cell_head_chars":4096},"cells_cut":0,"cells_raw":0,"read":"whole","date_system":"1900"}

{"sheet":"Sheet1","index":0,"n_rows":36,"n_cols":10,"rows_kept":36,"cut":false,"hidden":false,"merged":[]}
["各種コントロールによるボタンの文字・背景色の制御"]
[]
[null,"ボタンＯＮ",null,"文字色：赤　文字の両端に★マーク　背景色：黄色"]
[]
[null,"フォームコントロール",null,null,null,"activexコントロール",null,null,null,"オートshape"]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[null,null,"各ボタン毎に特徴があるので、いろいろ使ってみましょう"]
[null,"各種コントロールボタンの特徴"]
[]
[null,"フォームコントロール",null,null,"とりあえずはこのボタンを使います。プロパテイが少ないので文字の色と文字自体の変更しか出来ません。"]
[null,null,null,null,"ボタンの右クリックメニューの「マクロの設定」で直接標準モジュールのプロシージャ を直接リンク出来ます"]
[]
[null,"Activexコントロール",null,null,"そこそこのプロパテイがあるので、ボタンの色、枠、文字関係の様々な設定、変更が出来ます。"]
[null,null,null,null,"コードは元々シートに紐づけて設定されるので、場合により、そこに記述するか、標準モジュールのプロシージャ "]
[null,null,null,null,"を指定する場合はサブルーチンのcallの形で行います。"]
[]
[null,"オートShape",null,null,"元々、シート上に貼り付けられる図形（Shape）は、上の2つに比べ最も外観の自由度の高いオブジェクトです。"]
[null,null,null,null,"ボタンの右クリックメニューの「マクロの設定」で直接標準モジュールのプロシージャ を直接リンク出来ます"]
[null,null,null,null,"ただ、上の2つのボタンは最初からトリガーボタンとして、クリックするとへこむ様な動作が組み込まれていますが"]
[null,null,null,null,"このShapeはあくまで静的な図形なのでクリックしても動きがありません。"]
[null,null,null,null,"まあ、これに目をつぶってそのままトリガーボタンとして使う事は出来ますが、やはりボタンみたいな動きを"]
[null,null,null,null,"させたいのならば、少しそれなりの処理を追加する必要があります。"]
[null,null,null,null,"だたそれには、マウスの左クリックのイベントを捕捉する必要がありますがVBAにはその機能はありません"]
[null,null,null,null,"windowsAPIを使えば出来そうですが、まあそこまでやることはないかなと思って、この例ではクリックしたときの"]
[null,null,null,null,"ボタンの位置、影の状態等を変えてやることで、なんとなく～ですがボタンを押した様な感じにしています。"]