pt/VBA
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Update FL.bas

Browse Source
This commit is contained in:
fleetside72 2017-04-05 09:53:14 -04:00 committed by GitHub
parent 51164251a5
commit 730b2667d3
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
FL.bas
View File

@ -357,6 +357,7 @@ errh:
End Sub
Sub CollapsePvtItem()
On Error GoTo show_det
@ -464,7 +465,7 @@ drill_down:
errh:
End Sub
Sub ColorMatrixExtract()
Dim s() As String
@ -515,4 +516,11 @@ Sub ColorMatrixExtract()
End Sub
Sub SetPivotShortcutKeys()
Call Application.MacroOptions("PERSONAL.xlsb!CollapsePvtFld", "", , , , "A")
Call Application.MacroOptions("PERSONAL.xlsb!CollapsePvtItem", "", , , , "Z")
Call Application.MacroOptions("PERSONAL.xlsb!ExpandPvtFld", "", , , , "S")
Call Application.MacroOptions("PERSONAL.xlsb!ExpandPvtItem", "", , , , "X")
End Sub