批量修改一张表格的多个sheet名

例如这样的函数：

Sub aab()

    For x = 4 To 5

    Sheets(x).Name = "10" & Format(x - 3, "00") & "-01_V03"

        Next

End Sub