hs=Range(“A”).End(xlDown).Row上述代码段的功能是：求数据区A到数据最后的有效行行数