新復制的工作表怎么重命名?
function 新建工作表()
{var a列=1
while(ThisWorkbook.Sheets("試試").Range("a"+a列).Value2!=null){var 新建工作表=Sheets("Sheet4").Copy(null,Sheets("Sheet4"))
新建工作表.Name=String(ThisWorkbook.Sheets("試試").Range("a"+a列).Value2)
Range("b2").Value2=ThisWorkbook.Sheets("試試").Range("b"+a列)
++a列
}
}
承擔因您的行為而導致的法律責任,
本站有權保留或刪除有爭議評論。
參與本評論即表明您已經(jīng)閱讀并接受
上述條款。