摘要：
Option Base 1
'此为对字串进行分列处理，将每个学生的每个小题的选项进行分列。 Sub 分列操作()
Dim i As Integer, totalR As Integer, j As Integer
totalR = Range("A65536").End(xlUp).Row
For i = 2 To totalR
For j = 1 To Len(Cells(i, 5).Va... 阅读全文
posted @ 2012-10-20 11:33
surfacetension
阅读(617)
评论(0)
推荐(0)
浙公网安备 33010602011771号