屏蔽錄製巨集鈕

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2014-5-29 14:00 | 只看該作者

平安
功能列裡的"錄製新巨集"鈕
想將它屏蔽
代碼要怎麼下？

無止盡的努力上進

2^#

發表於 2014-5-30 08:39 | 只看該作者

平安
功能列裡的"錄製新巨集"鈕
想將它屏蔽
代碼要怎麼下？
vinejason 發表於 2014-5-29 14:00

使用以下代碼可以屏蔽工具鈕
但是若只屏蔽錄製新巨集可以做得到嗎

Application.CommandBars("Worksheet Menu Bar"). _
Controls("工具(&T)").Enabled = False

無止盡的努力上進

3^#

發表於 2014-5-30 10:32 | 只看該作者

回復 2# vinejason
類似這樣吧，我只有Excel 2010只剩"功能區"了，沒辦法測試。

For Each x In Application.CommandBars("Worksheet Menu Bar").Controls("工具(&T)").Controls("巨集(&M)").Controls
If InStr(x.Caption, "錄製新巨集") Then x.Enabled = False: Exit For
Next

複製代碼

4^#

發表於 2014-5-30 14:26 | 只看該作者

回復 3# stillfish00

謝謝您的幫忙
祝您端午佳節快樂
平安喜樂

無止盡的努力上進

靜思自在 : 天上最美是星星，人生最美是溫情。