I thought I would just share 3 of my very simple macros in my Personal macro workbook:
Code: Select all
Sub TM1activate()
AddIns("IBM Cognos TM1 Perspectives").Installed = True
End Sub
Sub TM1deactivate()
AddIns("IBM Cognos TM1 Perspectives").Installed = False
End Sub
Sub ToggleCalculationMode()
With Application
If .Calculation = xlCalculationAutomatic Then
.Calculation = xlCalculationManual
.CalculateBeforeSave = False
Else
.Calculation = xlCalculationAutomatic
.CalculateBeforeSave = True
End If
End With
End Sub
Cheers,
Wim