2020年3月1日
格式
摘要： Sub jljl() arr = Range("a2:e22") '内存表 For r = 2 To 100 Step 2 '取一个大点的数假如要放100行 For y = 1 To 8 'PL号要分多少列 m = m + 1 '循环数据表的每一行 Cells(r, "g") = arr(m, 1) 阅读全文
posted @ 2020-03-01 00:55 zhujie- 阅读(173) 评论(0) 推荐(0) 编辑