Sub 自动重复执行()For i = 1 To 100Selection.TypeText Text:="字幕序号" & Right("1000" + i, 3) & ","NextEnd Sub
为什么一定要用宏呢?自定义一个自动编号不是简单许多么?