1、首先,在Excel中按快捷键Alt+f11。
2、然后,在进入的VBA编辑器中依次点击插入——模块。
3、接着,在模块中输入下面的代码:
Option Explicit
Sub addwork()
Sheets.Add after:=Sheets(Sheets.Count)
End Sub
4、之后,在VBA编辑器左侧输入模块的名称。
5、如图所示,关闭掉VBA编辑器,返回到Excel工作表中,再依次点击视图——宏——查看宏。
6、最后,在弹出的窗口中点选宏名,再点击执行按钮即可。
1、首先,在Excel中按快捷键Alt+f11。
2、然后,在进入的VBA编辑器中依次点击插入——模块。
3、接着,在模块中输入下面的代码:
Option Explicit
Sub addwork()
Sheets.Add after:=Sheets(Sheets.Count)
End Sub
4、之后,在VBA编辑器左侧输入模块的名称。
5、如图所示,关闭掉VBA编辑器,返回到Excel工作表中,再依次点击视图——宏——查看宏。
6、最后,在弹出的窗口中点选宏名,再点击执行按钮即可。