如何修改当前工作簿名称，vba excel

如题所述

举报该问题

第1个回答 2016-08-18

只能另存，不能直接改名

Option Explicit

Sub rename()()
ThisWorkbook.SaveAs ThisWorkbook.Path & Application.PathSeparator & "aa.xlsm"
End Sub

本回答被提问者采纳

相似回答

4.3.1 利用Excel Workbooks修改当前工作薄名称答：在VBA中，用户不能直接修改工作薄的名称。如果需要修改，只能通过文件另存的方式修改工作簿的名称。代码如下所示:Sub rename()ActiveWorkbook.SaveAs "newfile"End Sub，将工作薄另存为newfile.xls以上代码新建了一个newfile.xls的工作薄文件，并将该工作簿保存在默认位置.用户也可以指定工作薄的保存位置...

excel中如何批量修改文件名excel中如何批量修改文件名字答：使用VBA宏批量修改Excel文件名称，首先需要编写宏代码，然后在Excel中运行代码即可实现批量修改。具体操作步骤为：打开Excel工作簿，按下Alt+F11键，进入Visual Basic编辑器界面，选中工作簿或模块，输入VBA宏代码，保存文件并关闭编辑器界面，运行宏代码即可实现批量修改Excel文件名称。同时，可以根据实际需求设置...

如何用excel的VBA来修改工作表名称答：代码如下，参见附件 Sub RenameSheet() Dim sht As Worksheet, shtName As String, str For Each sht In ActiveWorkbook.Worksheets shtName = sht.Name For Each str In Array("【强度】", "【量能】", "【日志记录】") shtName = Replace(shtName, str, "") Next str ...

Excel如何批量修改sheet名字??改成9-7到9-30这样答：Excel可以利用VBA改Sheet名字。软件版本：Office2007 方法如下：1.将Sheet名字改成9-1到9-30：2.Alt+F11，输入代码如下：3.F5执行代码，得到结果如下：

Excel中,使用VBA以某一单元格内容命名工作表答：1、首先选中Excel表格，双击打开。2、然后在该界面中，选中要以某一单元格内容命名的工作表，右键点击“查看代码”。3、再者在该界面中，输入VBA代码“Sub 更改名称度() Dim mYn As String mYn = Cells(1, 1) ActiveSheet.Name = mYn End Sub”。4、其次在该界面中，点击“执行”按钮。5、、...

EXCEL批量修改工作表名称 VBA答：VBA代码如下：Sub 宏1() For Each r In Sheet1.Range("B2:B100").Cells With ThisWorkBook.Sheets.Add .Name = r.Value .Cells(1,1) = r.Value End With Next rEnd Sub'如果执行中遇到问题请拷屏追问，如需代劳请百度云联系。

大家正在搜

vba当前工作簿名称用vba复制多个excel工作簿 excelvba合并工作簿 vba复制工作表到另一个工作簿 excel工作簿批量重命名 excel工作簿命名多个excel工作簿合并 excel vba 多条件筛选 excel vba 单元格赋值

使用VBA修改当前文件夹下所有工作簿的名称

如何用excel的VBA来修改工作表名称

EXCEL批量修改工作表名称 VBA

VBA excel如何自动获取当前工作表的名字？

VBA怎样修改同目录下的工作薄名称

求批量修改同一工作簿的所有工作表名称为每一个工作表的同一单元...

VBA excel 如何自动获取当前工作表的名字,语句如下。

Excel 怎么用VBA自动新增工作表，并修改工作表的名称