发布网友 发布时间:2022-04-26 09:31
共4个回答
热心网友 时间:2023-10-09 06:13
不需要用VBA,直接用函数即可。
使用函数来处理
Excel版本参考:2013
1、A1输入公式:=REPLACE(CELL("filename"),1,FIND("]",CELL("filename")),"")
2、回车完成
函数简单解析:
1、CELL("filename"),获取活动工作薄的全路径
2、REPLACE替换函数,此处从第一个到],替换为空
热心网友 时间:2023-10-09 06:13
宏代码
Sub 指定位置新建工作表并命名()
Sheets.Add before:=Sheets(1)
'before 前边.after 后边
ActiveSheet.name = "表1"
Cells(1, 1) = "A1单元格输入的内容"
End Sub
热心网友 时间:2023-10-09 06:13
表1是指原来的那个表吗?如果是的话,试试下面的代码
Sub 新建工作表()
Sheets.Add
ActiveSheet.Name = Sheets("表1").Range("a1")
End Sub
热心网友 时间:2023-10-09 06:14
录制宏