我在excel中添加一个按钮，想实现，输入表单的名称，就生成一个名称为XX的表单

[shinesunny]

我在excel中添加一个按钮，想实现，输入表单的名称，就生成一个名称为XX的表单，可是现在问题是，我使用
Msheetsnames = Mnumber & "SMT"
createname = "sheet" & i
Sheets.add
Sheets(createname).Name = Msheetsnames
i = i + 1

可是总是不对，因为每次添加的sheet的名字的顺序，怎么很乱的。