Excel 复制工作表并将其命名为前导零的数字

我有一个标签页，范围从“1”到“53”

如果值低于10-01、02、03等，我想先用0命名图纸

这是当前的代码

子副本（）
设置ws=Sheets（“01”）
curName=图纸（“数据”）。索引+-1
ws.Copy Before:=工作表（“数据”）
设置wsNew=工作表（工作表（“数据”）。索引+-1）
wsNew.Name=curName+1
端接头

您可以通过以下方式使用格式功能，以确保如果

curName+1

是一个单位数，那么它将以0作为前缀

wsNew.Name = Format(curName + 1, "0#")

---

精彩的！非常感谢。