作业帮 > 综合 > 作业

excel 根据第一列(个数)第二列(字母) 生成序列

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/05/01 13:31:03
excel 根据第一列(个数)第二列(字母) 生成序列
第一列 第二列
3 A
2 B
4 C
生成在第三列(请大家给个公式)
A
A
A
B
B
C
C
C
C
说明:意思是生成 3全A ,2个B,4个C
用VBA做吧,代码如下Sub 填充()
r = 1
r_2 = 1
num = Cells(r, 1)
Do While num <> ""
    For i = 1 To num
        Cells(r_2, 3) = Cells(r, 2)
        r_2 = r_2 + 1
    Next i
    r = r + 1
    num = Cells(r, 1)
Loop
End Sub用法:打开Excel表,按Alt+F11打开编辑器,选择:插入——模块,将以上代码复制到新插入的模块中,关闭编辑器回到Excel界面,选择:宏——运行宏,运行名字为“填充”的宏即可 注:由于用到了宏,需要将宏安全性改为中或低,否则无法正常运行,附件中文件是写好代码的供参考