The variable hrowc you defined is plastic, and the maximum value is 32768. If the number of rows in the table exceeds this number, an overflow error will occur. Change hrowc AS Integer defined in dim statement to HROWC &; This is defined as long shaping.