vba根据excel内容批量命名
如何用VBA给excel工作表批量重命名？
如何用VBA给excel工作表批量重命名？
代码如下：
Sub 宏1() for i2 to Sheets(i)trim(i-1) next iEnd Sub
70?Excel中怎样在窗体中点击按钮调出VB编辑器？
问题1：EXCEL表打开，按“ALT” “F11”进入VBA编辑状态，点击“工程资源管理器”图标，在“工程资源管理器”窗体内--gt鼠标右键--gt“插入”-gt“模块”；出现“模块1”，点击“属性窗口”图标对“模块1”进行命名；双击命名后的模块名称，在右边的“窗体”内就可以编辑VBA代码了。问题2：在EXCEL“菜单”栏上-gt鼠标右键-gt选择“窗体”；在“窗体”控件栏内选择“命令按钮”-gt在EXCEL表内“画出”“命令按钮”-gt弹出“制定宏”的窗口-gt选择你刚刚编制的VBA宏后就可得到你想要的效果了。
excel备份的文件怎么重命名？
第一步，导入VBA模板文件，新建一个EXCEL文档，按ALT F11 调出VBA 编辑器 →在工程窗口右键选择【导入文件】→选择VBA 模块文件（批量重命名.bas）→关闭VBA 编辑器。
第二步，批量获取文件名，点【开发工具】→【宏】→选择宏“批量获取文件名”→【执行】，弹出浏览文件夹对话框，选择你需要重命名文件所在文件夹，这里我们选择test测试文件夹，确定后，测试文件夹的所有文件的旧版文件名，文件类型，所在位置都列出来了。由于我们要把部门和身份证号放到文件名中，所以我们要用vlookup从员工花名册中将员工的部门和身份证号查找出来，这里将到一个辅助列，在辅助输入公司获取员工姓名，LEFT(A2,LENB(A2)-LEN(A2))，其中LENB是计算字节数的函数，LEN是计算字符数的函数，LEFT（A2）函数，即从旧版名称的左边截取单元格的中文姓名；VLOOKUP，通过姓名在员工花名册中找出员工的部门和身份证号，并用amp把查找出来的部门、身份证号和姓名以及他们中间的小横杆连接起来。公式：VLOOKUP(E2,员工花名册!B:C,2,0)amp#34-#34ampVLOOKUP(E2,员工花名册!B:D,3,0)amp#34-#34ampA2，公式写好后，往下填充，新版名称就都出来了。
第三步，批量重命名文件，点【开发工具】→【宏】→选择宏“批量重命名”→【执行】2分钟不到，所有的文件已按要求重命名好了。