返回第1行最后一列(即记录的总条数)[iv1].End(xlToLeft).Column当前工作表中已使用的列数ActiveSheet.UsedRange.Columns.Count
cells(1,columns.count).end(xltoleft).column
