2013年1月25日
根据sheet1指定行数往sheet2中写数据
摘要： Dim i As IntegerSub addNewInfo(ByVal stext As String, ByVal icount As String) Worksheets("Sheet2").Activate Dim rowcount As Integer Dim j, m As Intege... 阅读全文
posted @ 2013-01-25 10:00 骑着骆驼逛沙漠 阅读(248) 评论(0) 推荐(0) 编辑