删除/列出所有键盘快捷键VBA excel
我们办公室中的某人已将一个宏分配给Ctrl + D。这很令人沮丧,因为它在Excel中已经有了一个函数。删除/列出所有键盘快捷键VBA excel
Excel使您可以轻松地在开发人员>宏中分配宏,我知道如果我在此菜单中推送选项,我可以看到哪些键被分配到了哪里。本工作手册中的宏列表很大,我不想单独打开每个宏。
这是哪里列出的?我认为有一个日志与这个地方?这是我能找到的最接近msdn的地方,但我需要在macroworkbook中分配宏:https://msdn.microsoft.com/en-us/library/hh179479(v=nav.90).aspx
感谢@GSerg指出了这一点,我将在这里发布这个完整性来结束这个问题。来源是在这里:
https://groups.google.com/forum/#!topic/microsoft.public.excel.worksheet.functions/TwcT-IlWjVk
To use this Macro (Sub), <alt-F8> opens the macro dialog box. Select the macro by name, and <RUN>.
===================================================
Option Explicit
'MUST set to Trust Access to the VBA Project Object Model
' in Excel Options
'Set reference to:
'Microsoft Visual Basic for Applications Extensibility
'Microsoft Scripting Runtime
'Microsoft VBScript Regular Expressions 5.5
Sub ListMacroShortCutKeys()
Dim VBProj As VBIDE.VBProject
Dim VBComp As VBIDE.VBComponent
Dim CodeMod As CodeModule
Dim LineNum As Long
Dim ProcKind As VBIDE.vbext_ProcKind
Dim sProcName As String, sShortCutKey As String
Const FN As String = "C:\Temp\Temp.txt"
Dim S As String
Dim FSO As FileSystemObject
Dim TS As TextStream
Dim RE As RegExp, MC As MatchCollection, M As Match
Set RE = New RegExp
With RE
.Global = True
.IgnoreCase = True
.Pattern = "Attribute\s+(\w+)\.VB_ProcData\.VB_Invoke_Func = ""(\S+)(?=\\)"
End With
Set FSO = New FileSystemObject
Set VBProj = ActiveWorkbook.VBProject
For Each VBComp In VBProj.VBComponents
Select Case VBComp.Type
Case Is = vbext_ct_StdModule
VBComp.Export FN
Set TS = FSO.OpenTextFile(FN, ForReading, Format:=TristateFalse)
S = TS.ReadAll
TS.Close
FSO.DeleteFile (FN)
If RE.Test(S) = True Then
Set MC = RE.Execute(S)
For Each M In MC
Debug.Print VBComp.name, M.SubMatches(0), M.SubMatches(1)
Next M
End If
End Select
Next VBComp
End Sub
==============================
按ALT + F11转到您的项目模块。你可以在这里找到快捷键vba宏编码。如果你想保留它,那么不需要做其他的事情,你可以选择全部并删除并保存并关闭文件。
准确的宏编码在哪里? – User632716
在模块中,您可以找到宏编码。 – jitender
http://answers.microsoft.com/en-us/msoffice/forum/msoffice_excel-mso_winother/how-to-list-keyboard-shortcuts-assigned-to/5928fc4f-ae30-469f-86a0-70a332e3be1e?auth = 1 – GSerg
看看[这个页面](http://excel.tips.net/T003162_List_of_Macro_Shortcuts_in_All_Open_Workbooks.html)以及 – BruceWayne
首先写出他们的答案得到的观点:) – User632716