在excel中已经加载了宏,但是在工具栏制作自定义宏图标,指定宏的时候却找不到宏文件,求高手指教! 20

 我来答
eeeolol
2016-08-05 · TA获得超过8245个赞
知道大有可为答主
回答量:5827
采纳率:15%
帮助的人:659万
展开全部
你已经把加载宏文件保存到这里了吗: C:\Users\你的用户名\AppData\Roaming\Microsoft\AddIns
追问
已经保存在C:\Users\你的用户名\AppData\Roaming\Microsoft\AddIns目录下了;我再excel2010也试了下,也是这样,找不到宏文件
追答
是通过“浏览”查找文件的吗

======================================
你不妨用代码来试试插入到工具菜单中,这是我自己建立的工具菜单:
复制一个“加载宏”文件,修改扩展名为:.xls
然后打开进入VBA界面,双击左侧的“Thisworkbook”,写入代码:
Private Sub Workbook_Open()
'以下代码是在工具菜单里建立一个自定义菜单名按钮,以启动你制作的加载宏代码的过程
On Error Resume Next
Dim NewItem As CommandBarButton
Application.CommandBars("Worksheet Menu Bar").Controls("工具(T)").Controls("sql按时间全部归类BS").Delete '自定义菜单名
Set NewItem = Application.CommandBars("Worksheet Menu Bar").Controls("工具(T)").Controls.Add _
(Type:=msoControlButton, Before:=1, temporary:=True)
With NewItem

.Caption = "sql按时间全部归类BS" '自定义菜单名
.OnAction = "sql按时间全部归类BS" '模块1的名字
.FaceId = 34
.BeginGroup = True
End With

接着按加载的步骤进行加载

'======================:要确保VBA中插入的"模块1"中存在 .OnAction代码语句中的模块,两处的名字要一致
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式