ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 728|回复: 2

[讨论] EXCL选项 和 宏功能 异常

[复制链接]

TA的精华主题

TA的得分主题

发表于 2022-1-11 18:17 | 显示全部楼层 |阅读模式
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
一直好好的,昨天我EXCEL关闭后就一直不能正常打开,用安全模式打开后,Excel选项里头“常用/公式/校正/保存/高级/信任中心”这些选项均无法点击,动画里头鼠标移动上去可以看到没反应,其它3个选项移动上去是有反应的,也可以点击。

最后一次出问题的宏文件代码如下,本来只想屏蔽鼠标右键菜单,用了一次所有cmb.enable=false,现在调整回来,发现很多commandbar的Enable并不能设置成True,也不知道是否是因为这段代码造成的,怀疑它主要是最后一次就是用这个代码,还请大佬帮忙,感谢!

##卸载,重新安装也不行##

请大佬帮忙,感谢! WIN10  EXCEL 2007


代码如下:
'//~禁止各种菜单代码
Sub CmbarsEnable()
    On Error Resume Next
    Dim cmb As CommandBar
    i = 1
    For Each cmb In Application.CommandBars
        If cmb.Enabled = False Then
            Debug.Print i, cmb.Name, cmb.Enabled
            i =i+1 : cmb.Visible = True : cmb.Enabled = True
        End If
        'cmb.Enabled = True
        cmb.Enable = false
        cmb.visible = false
    Next
End Sub


调试还发现下面这些均不能设置Enable为True

1            Ribbon Adapter              False
2            Ink Drawing and Writing     False
3            Ink Annotations             False
4            PivotTable Field List       False
5            PivotChart Filter Pane      False
6            Clipboard     False
7            Online Meeting              False
8            Task Pane     False
9            XML Source    False
10           Research      False
11           XML Document  False
12           Signatures    False
13           Document Actions            False
14           Clip Art      False
15           Selection and Visibility    False
16           Document Management         False
17           Document Updates            False
18           Mail Merge Panes            False
19           Fax Service   False
20           Meeting Workspace           False
21           Attachment Options          False



打开任何EXCEL文件3个进程,2秒后全部自动退出



安全模式可以打开,EXCEL选项功能均无法正常使用的截屏

TA的精华主题

TA的得分主题

发表于 2022-1-12 04:55 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
The Windows Error Reporting tool, Dw20.exe, collects information automatically whenever an Office program stops responding.

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-1-13 09:08 | 显示全部楼层
医生看不出来门道, 实在搞不定,换了2016,感谢版主
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-6-11 14:07 , Processed in 0.035820 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表