有关excel如何确定最后一行

dim x x=Application.WorksheetFunction.CountA(RANE(E2:E10000))通过这个来计算出数据的行数。这样便可将Range(E2:M6140)换成Range(cells(2,5),cells(x+1,13))了