You're saying this works? Sheets("Blank (2)").name = sname. Then, do this: With Sheets("Blank (2)") .Name = sname .Activate .Select End With.
確定! 回上一頁