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