插入工作表这样的事自然不能由公式完成了，也就不存在下拉实现，是一定要用VBA来实现的。新添加的表如何命名这到是个问题，估且用B1、B2来表示吧。用以下代码
sub AA()
for i=worksheets.count to 1 step -1
worksheets.Add before:=worksheets(i)
ActiveSheet.name="B"& i
next
end sub
插入工作表这样的事自然不能由公式完成了，也就不存在下拉实现，是一定要用VBA来实现的。新添加的表如何命名这到是个问题，估且用B1、B2来表示吧。用以下代码
sub AA()
for i=worksheets.count to 1 step -1
worksheets.Add before:=worksheets(i)
ActiveSheet.name="B"& i
next
end sub
