Public rngSelect As Range  '選択域
Public Const TIME_NO_IMP_INIT = 30   'ソルバーで解決を続行する時間の初期値:秒単位
Public Const TIME_NO_IMP_MAX = 300   'ソルバーで解決を続行する最大時間:秒単位