Excel 2013 VBA and Macros (MrExcel Library) by Bill Jelen & Tracy Syrstad

Author:Bill Jelen & Tracy Syrstad [Jelen, Bill]
Language: eng
Format: epub
Publisher: Pearson Education
Published: 2013-02-03T22:00:00+00:00

Private m_except As StateEnum

Public Enum StateEnum

None = 0

ScreenUpdating = 1

EnableEvents = 2

DisplayAlerts = 4

Calculation = 8

Cursor = 16

End Enum

Public Sub SetState(Optional ByVal except As StateEnum = StateEnum.None)

m_except = except

With Application

If Not m_except And StateEnum.ScreenUpdating Then

.ScreenUpdating = False

End If

If Not m_except And StateEnum.EnableEvents Then

.EnableEvents = False

End If

If Not m_except And StateEnum.DisplayAlerts Then

.DisplayAlerts = False

End If

Download

Copyright Disclaimer:
This site does not store any files on its server. We only index and link to content provided by other sites. Please contact the content providers to delete copyright contents if any and email us, we'll remove relevant links or contents immediately.