This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' | |
'INPUT : True or False (i.e. fast or slow) | |
'DESCRIPTION : this sub turns off screen updating and alarms then | |
' sets calculations to manual | |
' | |
Public Sub GoFast(OnOrOff As Boolean) | |
Dim CalcMode As XlCalculation | |
CalcMode = Application.Calculation | |
With Application | |
.ScreenUpdating = Not OnOrOff |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
'gistThat@mcpher.com :do not modify this line - see ramblings.mcpher.com for details: updated on 28/02/2013 09:55:55 : from manifest:3414394 gist https://gist.github.com/brucemcpherson/3414836/raw/cregXLib.cls | |
Option Explicit | |
' v2.02 | |
'for more about this | |
' http://ramblings.mcpher.com/Home/excelquirks/classeslink/data-manipulation-classes | |
'to contact me | |
' http://groups.google.com/group/excel-ramblings | |
'reuse of code | |
' http://ramblings.mcpher.com/Home/excelquirks/codeuse | |
' for building up a library of useful regex expressions |