本篇经验将和大家分享【在VBA中,事件程序的应用——新建工作表时,自动弹出输入工作表名称的对话框!】
方法/步骤
-
1
首先,在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】!
-
2
会进入VBA编辑界面!双击左侧栏中的“thisworkbook”工作薄!
-
3
会弹出事件程序代码编辑窗口!
-
4
在事件程序界面里的左下拉菜单中选择【workbook】,右下拉菜单中先选择【newsheet】。
-
5
在事件程序窗口,输入以下代码:
Private Sub Workbook_NewSheet(ByVal Sh As Object)
On Error Resume Next
i = InputBox("请输入新建工作表名称")
Sh.Name = i
End Sub
-
6
保存VBA代码,返回工作簿中的工作表,如图所示。当我们点击【插入工作表】按钮时,会弹出输入工作表名称对话框!
-
7
在对话框中输入“789”,点击【确定】!新建工作表会被命名为“789”!
END
经验内容仅供参考,如果您需解决具体问题(尤其法律、医学等领域),建议您详细咨询相关领域专业人士。
作者声明:本篇经验系本人依照真实经历原创,未经许可,谢绝转载。
展开阅读全部
文章评论