Application.ScreenUpdating Not Work in Excel 2013

Hello,

I trying to run the code above in the office 2013, but the hidden sheet while processing does not appear. This code work fine in previous office.

Can some one find whats wrong in this code.

Thanks

Sub Caixa()

Dim myvalue As Variant

myvalue = InputBox("P.f. introduza o número do vendedor")
Sheets(".").Visible = True
Sheets(".").Select
Range("k5").Select
Application.ScreenUpdating = False
Sheets("Analise de clientes em rota").Select
Range("h2").Value = myvalue
Application.ScreenUpdating = True
Sheets(".").Visible = False

End Sub

Didn't test but try to activate sheet

Please Login or Register  to view this content.

I kind a noob, what sheet?

The sheet name is . (dot), and i supose i did it " Sheets(".").Activate "

So does it work?

In this office, the sheet while is doing something not appear, this code is a sample, but i need to use the same thing in a module of a lot of things.

I just want, when a processing something, to the user see a blank sheet and after, show the result.

Any news about screen updating this year?

Hi, it kind of work.

But in my case, when i use screenupdating, i want that the macro goes to a black sheet (for exemple), and do the stuff and after finished goes back to the start, like this one.

Sub Caixa()

Dim myvalue As Variant

myvalue = InputBox("Please enter the number")
Sheets("Wait").Visible = True
Sheets("Wait").Select
Range("A1").Select
Application.ScreenUpdating = False
Sheets("Clients").Select
Range("h2").Value = myvalue
Application.ScreenUpdating = True
Sheets("Wait").Visible = False

End Sub

When i put this before screenupdating

Application.Wait DateAdd("s", 1, Now)

Somehow it works, but in other complex vba code does not.

Yes, i know that.

The data is in sheet Clients, the sheet wait is a black sheet with the message " Please Wait ", only to process the data until.