Shortcut Key - Personal.xlsb

[davidhall]

I have recorded a macro that I have stored in the personal.xlsb file. It is assigned to a module in the personal.xlsb file with the shortcut key ctrl+shift+q that makes it run.

When I close the personal.xlsb workbook and save the changes, I try and run that same shortcut key in another workbook and it doesn't seem to work. I'm trying to apply this same shortcut key macro to any excel workbook I open.

Here is my code.




Sub SelectAllUnmerge()
'
' SelectAllUnmerge Macro
'
' Keyboard Shortcut: Ctrl+Shift+Q
'
ActiveSheet.Cells.Select
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
ActiveSheet.Cells.Select
Selection.Copy
End Sub


Any suggestions?

 

[pboltonchina]

If you close the Personal workbook and save changes then it's saved, but you need to have Personal open for the macro to be available. Does the macro run OK if you open the macro from the macro list & click Run?

 

[davidhall]

Yes, the macro runs okay. Is there any way around always having the personal.xlsb open?

 

[pboltonchina]

Personal.xlsb should reside in the XlStart folder and open when Excel opens but this is normally set as a hidden file so you don't see it, but your macros are always available. If it doesn't open, your macros will not be available. If you store it in ThisWorkbook it will only be available when the workbook it is in is open.