セル値によって色を付ける Sub test()      ’ デフォルトシート数を変更 (シート6つにする   &nb···