作者：乔山办公网日期：
返回目录：excel表格制作
工作表的插入----插入－－工作表 或点SHEET1－－右键插入删除－－点下方SHEET2－－右键－－删除重命名－－点下方SHEET2－－右键－－重命名
1、首先我们打开一个工作样表作为例子。
2、我们使用alt+f11组合快捷键进入vbe编辑器，插百入一个新的模块，并在模块中输入以下代码：Sub rename() Name "<工作簿路径>\<旧名称>.xls" As "<工作簿路径>\<新名称>.xls"End Sub。
3、我们知道在excel中保存一个文件为另一个文件时可以度重新命名，save as 就是本例中as 代码的作用。name是命名函数，所以name as 就是将文件重命知名。
4、不过需要注意的是，name改名修改的文件是未打开文件，如果是打开的文件直接运行代码的话，程道序会报错。
5、文件的名称需要使用双引号包括起来，需要填写完整的路径和文件名称，包括文件的后缀内名。大家需要注意文件的后缀名是需要通过系统设置来显示的。
6、最后，使用name重命名文件只要是符容合未打开这一要素，就可以改名任何文件，包括但不限于excel的文件。当然后缀也可以修改，但是会以默认的关联程序打开。
'你想删除的文件的名称例copy如文件名是中国什么省汇百总度.xls
FN = "中国什么省汇总.xls"
Dim FileName As String
FileName = Dir("D:\报表\*.xls")
Do While FileName <> ""
If FileName = FN Then
Kill "D:\报表\" & FileName
End If
FileName = Dir
Loop
个人观点是做不到。。。
不打开excel，vba就无法运行。
而删除，重命名都是在操作系统里完成的。。。
还请高人指点。