rIdを指定してSheetオブジェクトを取得できるようにしました

ついでにバグを1つ直しました。