range 是excel比较重要的区域
这里列觉宏的一个使用方法,以后会陆续添加
'获取最大列值, 数字类型  
j = Sheet6.UsedRange.Columns.Count
'获取最大行值,数字类型
    i = Sheet6.UsedRange.Rows.Count
’根据列的数字,转换成字符 如1--》A; 4--》D
    
    ColName = GetColumnName(j)
    
清空除第一行之外的所有行
    Sheet6.Range("A2", ColName & i).Clear