第1个回答 2014-01-17
如果不是太多,可以手动改一下。
如果比较多,可以用宏修改,宏的编写方法,可以用录制的方法改几个,然后根据规律,写就可以了。
不管怎么样改,要做好备份,以免改错后,造成损失。
第2个回答 推荐于2016-06-13
Sub 宏1()
'
' 宏1 宏
'
'
Dim i, j As Integer
j = Worksheets.Count
For i = 2 To j
Worksheets(i).Name = "Sheet" & (i)
Next
End Sub本回答被提问者和网友采纳
第3个回答 2014-01-17
目前我只知道可以重命名,但似乎没有批量重命名。
第4个回答 2014-01-17
Sub test()
i = 1
For Each sht In Sheets
sht.Name = i
i = i + 1
Next
For Each sht In Sheets
sht.Name = "Sheet" & sht.Name
Next
End Sub