当前位置:首页经验技巧Excel经验excel函数

excel表格中sub怎么使用

2025-01-01 13:35:24

1.Excel 怎样在主sub中引用其他自定义的sub

Sub 创建菜单项()

Dim MenuObject As CommandBarPopup

Dim MenuItem As Object

Call 删除菜单

Set MenuObject = Application.CommandBars(1).Controls.Add(Type:=msoControlPopup, before:=11, temporary:=True)

MenuObject.Caption = "泰星账务(&X)"

Set MenuItem = MenuObject.Controls.Add(Type:=msoControlButton)

MenuItem.Caption = "8月份生产日报表"

MenuItem.OnAction = "打开8月份生产日报表"

Set MenuItem = MenuObject.Controls.Add(Type:=msoControlButton)

MenuItem.Caption = "9月份生产日报表"

MenuItem.OnAction = "打开9月份生产日报表"

Set Menu = Nothing

Set MenuItem = Nothing

Set MenuObject = Nothing

End Sub

Sub 删除菜单()

On Error Resume Next

Application.CommandBars(1).Controls("泰星账务(&X)").Delete

On Error GoTo 0

End Sub

这是我在用的实例

直接写过程名或用Call 过程名 都可以引用子SUB。

2.如何在Excel中启动Visual Basic程序

1.在工作表标签右键菜单在弹出的菜单选择“查看代码”,就可以打开“查看代码”窗口。

2.在“工具”菜单选择“宏”下的“VB编辑器”。

3.控件在编辑设计状态的下,双击控件可以打开“VB编辑器”。

4.快捷键盘的方法是:ALT+F11,如果你已经打开“VB编辑器”,在当前状态在工作表状态的话,可以用ALT+TAB快捷切换。

5.当然也可以用WIN+TAB键进行快速切换。当然效果没有用ALT+TAB快捷切换好。


电脑版

免责声明:本站信息来自网络收集及网友投稿,仅供参考,如果有错误请反馈给我们更正,对文中内容的真实性和完整性本站不提供任何保证,不承但任何责任,谢谢您的合作。
版权所有:五学知识网 Copyright © 2015-2025 All Rights Reserved .