Excel 2013 screen update issues when switchng between two open workbooks.

I have tried to find a solution to this problem which I found threads back in 2014 that indicated it was a common problem with excel 2013 that at that time had not been resolved or not work around had been found.

I have my source workbook and I am importing multiple selected cell ranges from multiple sheets from a target workbook. The normal code "Application.ScreenUpdating = False " and "Application.ScreenUpdating = True" does not seem to stop the screen flicker when switching back and forth between the two workbooks. Since I cannot simply select a large range from one sheet to copy from the target and then paste into the source, I have to switch back and forth at least three times for each sheet, before moving on to others that I have to repeat the sequence again.

Has anyone found a solution to stop the screen updating that occurring when switching or Activating between two workbooks?

If were so simple to copy across the entire range I would, but these are ledger sheets and the structure for each is slightly different than the next with three different column structure each with different starting rows for what is being copied.

I'll research this a bit more and possibly give it a try. If your read my previous reply to AlphaFrog, it may be possible to make three different tables for each ledger. In the meantime I tried another approach that I found looking today which also did not work. In that it suggest creating a simple sub with the lines for screeupdating false, and then true, with a call to the actual code that runs the code that pulls data from the target workbook into the source. It did not work either.

Marvin, after loading and playing with Power query, it might work, but I was wondering if you might have any code examples of how to pull data using power query from another workbook. I recorded the macro but it does not show how to establish the connection and fails on trying to run the query. The code I ended up with after recording the macro is as follows:

"Sub DataQuery()
'
' DataQuery Macro
'

'
Selection.AutoFilter
ActiveSheet.ListObjects("Feb").Resize Range("$A$1:$P$101")
Range("Feb[[#Headers],[Feb ]]").Select
ActiveSheet.ListObjects("Feb").Resize Range("$A$1:$P$102")
Range("Feb[[#Headers],[Column1]]").Select
End Sub"

I appreciate any help you could throw my way.

So I found a solution searching online with the following two subs:
"Public Sub StroboscopeOff()
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Application.EnableEvents = False
ActiveSheet.DisplayPageBreaks = False
Application.DisplayStatusBar = False
Application.DisplayAlerts = False
End Sub

Public Sub StroboscopeOn()
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True
ActiveSheet.DisplayPageBreaks = True
Application.DisplayStatusBar = True
Application.DisplayAlerts = True
End Sub
"
In the actual code I am running I call the "StroboscopeOff" as well as "Application.ScreenUpdating = False " at the top of the code and then in reverse at the bottom of the code, I call the "StroboscopeOn" as well as "Application.ScreenUpdating = True". Combined this reduced the flicker to almost none. Once that was completed I am running an excel complier to create an .exe file. The end result was no flicker at all.

I am still interested in finding out more from MarvinP regarding power-query. I'll try contacting him directly. It may come in useful later.