{"text_format":"1","workbook":"xlsx","n_sheets":1,"sheets":["Sheet1"],"not_rendered":{"charts":0,"images":2,"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":56,"n_cols":9,"rows_kept":56,"cut":false,"hidden":false,"merged":[]}
["範囲の背景色、文字の色を変える、色の取得（10進、16進、RGB値）"]
[]
[]
[]
[]
[null,null,null,null,null,"テスト文字"]
[]
[]
["ボタンを押すたびに、黒枠内の"]
["フォントの色"]
["セルの背景色"]
["が交互に変わります",null,null,null,"文字色(ColorIndex)",null,3]
[null,null,null,null,"背景色(10進)",null,15790320]
[null,null,null,null,"背景色(16進）",null,"F0F0F0"]
[null,null,null,null,"背景色","R",240]
[null,null,null,null,null,"G",240]
[null,null,null,null,null,"B",240]
[]
[]
[]
[null,null,null,"色々な色の設定・取得方法があります"]
[null,"色の設定・取得の方法"]
[null,"（色の設定）"]
[null,null,"rngd=対象範囲"]
[null,"セルの色","rngd.Interior.Color = RGB(240, 240, 240)",null,null,null,"＞＞＞"]
[null,null,"rngd.Interior.ColorIndex= 5",null,null,null,"＞＞＞"]
[]
[null,"文字の色","rngd.Font.Color = RGB(240, 140,100)",null,null,null,"＞＞＞","文字の色"]
[null,null,"rngd.Font.ColorIndex = 5",null,null,null,"＞＞＞","文字の色"]
[]
[null,"（色の取得）"]
[null,null,"rngd=対象範囲"]
[null,"文字の色",null,"rngd.Interior.ColorIndex ",null,null,"＞＞＞",15,"セルの背景"]
[null,null,null,"rngd.Font.ColorIndex",null,null,"＞＞＞",3,"文字の色"]
[null,null,null,"Hex$(rngd.Interior.Color)",null,null,"＞＞＞","B4E0C6","セルの背景（16進）"]
[null,null,null,"Ｒ",null,null,"＞＞＞",198]
[null,null,null,"Ｇ",null,null,"＞＞＞",224]
[null,null,null,"Ｂ",null,null,"＞＞＞",180]
[]
[]
[null,"(RGB変換関数）",null,"10進の色ナンバーをＲＧＢ値に変換"]
[null,"（例）"]
[null,"10進",16777180]
[]
[null,"Ｒ値",220,null,"10進値を256で割った余り",null,null,"（整数値）"]
[null,"Ｇ値",255,null,"さらにそれを256で割った余り",null,null,"（整数値）"]
[null,"Ｂ値",255,null,"さらにそれを256で割った余り",null,null,"（整数値）"]
[]
[null,"（変換関数の定義の例）"]
[null,"Private Function Color_to_RGB(ByVal lngColor As Long) As RGBNumber"]
[null,null,null,"With Color_to_RGB"]
[null,null,null,"        .Red = lngColor Mod 256"]
[null,null,null,"        .Green = Int(lngColor / 256) Mod 256"]
[null,null,null,"        .Blue = Int(lngColor / 256 / 256)"]
[null,null,null,"End With"]
[null,"End Function"]