[已解决]excel一列出现很多绿色小对勾

rebornxldeng

楼主对VBA对象应该也不是很熟悉...我也不是很熟悉
看代码的大致意思
这个工作薄利用了工作薄相关事件的.
生成小对勾的代码不是在模块1-8里边.

而是在工作薄对象的代码模块里
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ThisWorkbook.RemovePersonalInformation = False
End Sub
删除代码

RibbonX_Code里边的代码
'Entry point for RibbonX button click
Sub ShowATPDialog(control As IRibbonControl)
    Application.Run ("fDialog")
End Sub
'Callback for RibbonX button label
Sub GetATPLabel(control As IRibbonControl, ByRef label)
    label = ThisWorkbook.Sheets("RES").Range("A10").Value
End Sub
删除
然后再表格里按F5,定位到 对象 将绿色小勾全部删除
这可能是一个对某个经营项目进行判断并标识的代码.殊不知利用太多外部图形元素会消耗掉大量内存.
这个代码的效率也不高,远不如EXCEL自身的条件格式.删除不可惜的.

nonger

rebornxldeng 发表于 2012-9-14 11:35
楼主对VBA对象应该也不是很熟悉...我也不是很熟悉
看代码的大致意思
这个工作薄利用了工作薄相关事件的.
...

这个代码是我加进去，网上搜的，说可以避免出现 隐藏宏 提示，刚才是忘删啦。
不过删去之后，还是不行（附件）。你那边删去这三行命令后，对勾就不再出现了吗？

rebornxldeng

nonger 发表于 2012-9-14 11:53
这个代码是我加进去，网上搜的，说可以避免出现 隐藏宏 提示，刚才是忘删啦。
不过删去之后，还是不行（ ...

VBAProject (FUNCRES.XLAM)
的RibbonX_Code 里边的代码也要删除
然后进入工作表,将对勾都删除掉.就可以解决了
VBA的知识不太全面的话,不建议在网上随便下载代码块......

nonger

rebornxldeng 发表于 2012-9-14 11:35
楼主对VBA对象应该也不是很熟悉...我也不是很熟悉
看代码的大致意思
这个工作薄利用了工作薄相关事件的.
...

上午没看全你的回复，已经按照你提供的步骤操作，结果可行，十分感谢。

nonger

jlf2003 发表于 2012-9-14 11:23
1\空位－－对象，按DEL键，如果一次性删除不完，多操作几次就可以了
2\选择整行--查找--替换""--OK
3\用代 ...

多谢回答，删除一次再打开缺失就没有了~