Solved

Why Application.ScreenUpdating code not working

Posted on 2013-01-14
7
528 Views
Last Modified: 2013-01-23
I have the following code in an excel worksheet

Private Sub Show_Hide_Subtotal_Click()
  Application.ScreenUpdating = False
    If Show_Hide_Subtotal.Caption = "Hide Sub-total" Then
        Sheets("Projections").Select
        ActiveSheet.Range("J:J").EntireColumn.Hidden = True
        Show_Hide_Subtotal.Caption = "Show Sub-total"
    Else
       
        Sheets("Projections").Select
        ActiveSheet.Range("J:J").EntireColumn.Hidden = False
        Show_Hide_Subtotal.Caption = "Hide Sub-total"
    End If
    Application.ScreenUpdating = True
End Sub
0
Comment
Question by:Apex623
  • 3
  • 2
7 Comments
 
LVL 46

Expert Comment

by:Martin Liss
ID: 38778410
I have the following code in an excel worksheet
and…?
0
 
LVL 26

Expert Comment

by:redmondb
ID: 38778531
Hi, Apex623.

Your code is working fine for me - please see attached.

In this example, turning off screen updating doesn't make any difference, so i presume that your real version must be doing other things. Please post all the code here.

Thanks,
Brian.ShowHide.xls
0
 
LVL 1

Author Comment

by:Apex623
ID: 38779165
Sorry I meant to say that the Application.Screenupdating is not working.    It shows the sheet being selected and I do not want that to happen.   I have posted the whole spreadsheet that I am working on.    The button that executes the code is on the "Proj. Assumptions" tab.   Thanks for the posts.
Client-Proforma.xlsm
0
U.S. Department of Agriculture and Acronis Access

With the new era of mobile computing, smartphones and tablets, wireless communications and cloud services, the USDA sought to take advantage of a mobilized workforce and the blurring lines between personal and corporate computing resources.

 
LVL 26

Accepted Solution

by:
redmondb earned 400 total points
ID: 38779204
Apex623,

Do you mean that you don't want the "Projections" sheet displayed? If so, then please see the attached.

Regards,
Brian.Client-Proforma-V2.xlsm
0
 
LVL 1

Author Closing Comment

by:Apex623
ID: 38812383
Thanks for your help!
0
 
LVL 26

Expert Comment

by:redmondb
ID: 38812468
Thanks, Apex623!
0

Featured Post

Back Up Your Microsoft Windows Server®

Back up all your Microsoft Windows Server – on-premises, in remote locations, in private and hybrid clouds. Your entire Windows Server will be backed up in one easy step with patented, block-level disk imaging. We achieve RTOs (recovery time objectives) as low as 15 seconds.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Scheduled Tasks Tweak 5 32
Excel Cell Total 3 22
Msgbox tickler 13 30
Want to Compare Ratings by group of tier's stuck in the process 1 17
If you get continual lockouts after changing your Active Directory password, there are several possible reasons.  Two of the most common are using other devices to access your email and stored passwords in the credential manager of windows.
When you see single cell contains number and text, and you have to get any date out of it seems like cracking our heads.
Windows 8 came with a dramatically different user interface known as Metro. Notably missing from that interface was a Start button and Start Menu. Microsoft responded to negative user feedback of the Metro interface, bringing back the Start button a…
With the advent of Windows 10, Microsoft is pushing a Get Windows 10 icon into the notification area (system tray) of qualifying computers. There are many reasons for wanting to remove this icon. This two-part Experts Exchange video Micro Tutorial s…

803 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question