31　Subscript out of range 添字が範囲外、というやつです。 ということは、その行の　[　]　の中身の値が悪い、というのがヒントでしょうか。