troubleshooting Question

Application Screen updating

Avatar of Seamus2626
Seamus2626Flag for Ireland asked on
Visual Basic ClassicMicrosoft Excel
5 Comments1 Solution420 ViewsLast Modified:
Hi,

I have a sub below, i have wrapped the sub, but it still shows me bits of what its doing, whereas it should be sticking on the sheet "Pic"

Any suggestions?

I dont want to see any updates.....

Thanks

Sub RunReport()


    Sheets("Pic").Visible = True
    Sheets("Pic").Select
    
    Application.ScreenUpdating = False


    OpenFiles

    ClearSheets
    
    DoTheWork
    
    SaveFiles
    
    Sheets("Pic").Visible = 2
    
    Sheets("Admin").Select
    
    MsgBox "Report is complete and files are saved"
    
Application.ScreenUpdating = True

End Sub
ASKER CERTIFIED SOLUTION
krishnakrkc

Our community of experts have been thoroughly vetted for their expertise and industry experience.

Join our community to see this answer!
Unlock 1 Answer and 5 Comments.
Start Free Trial
Learn from the best

Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.

Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 1 Answer and 5 Comments.
Try for 7 days

”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.

-Mike Kapnisakis, Warner Bros