Now what's odd is that on Workbook_Open I have set ScreenUpdating equal to false see the below code:
Private Sub Workbook_SheetActivate(ByVal Sh As Object) 'set zoom for active sheet to columns with data ActiveSheet.UsedRange.Resize(ActiveSheet.UsedRange.Columns.Count).Select ActiveWindow.Zoom = True: ActiveWindow.VisibleRange(1, 1).Select End Sub
I've discovered that if I add another Application.ScreenUpdating
Private Sub Workbook_Open() Application.ScreenUpdating = False Call FormatWorkbook 'activate StandardMode Sheets("StandardMode").Activate End Sub
|Hlookup formula help||14||19|
|How to change associated macro so it asks for folder rather than using hardcoded folder?||4||34|
|Can I reduce the fonts available by excel or visio for one project, but enable the full set of fonts for all other purposes?||8||32|
|Modifying Powershell and WMI to obtain disk, cpu, mem & IP data ?||5||32|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
14 Experts available now in Live!