当前数据所在列 :activecell.column列最后行的数据:cells(cells(rows.Count,activecell.Column).end(xlup).row,activecell.Column)