批量更改工作表的问题

jimboychen

HDbll90V.rar (15.89 KB, 下载次数: 6)

2010-4-17 10:06 上传

点击文件名下载附件
批量更改工作表的问题

附件是4月份的数据,现在想把它另存为5月份的数据,所以要批量把4月1日到4月30日的工作表名称更改为5月1日到5月30日..请各位高手帮帮忙!谢谢!

领风飞翔

Sub a()
Dim i%
For i = 1 To ThisWorkbook.Sheets.Count
    Sheets(i).Name = 5 & Mid(Sheets(i).Name, 2, 99)
Next
End Sub

梦镜0314

2楼的高手 ，能详细讲解下吗

柠檬猪

如何批处理表格的自动重算呀？？？高手们

。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。

http://www.abab123.com/bbs/down.asp?html=1387924   学习会计不用愁，快快进来ABAB，教程下载好帮手！！！！

mslan

看看