Jun 15 2018 09:58 PM - edited Jun 16 2018 11:00 AM
Good Day to all,
I'm working on 4 excel work book that are linked up together. I am using paste special link but in the long run it is not really running as smoothly and is it creating confusion to the other VBA codes that there are in the work books.
I have been looking on the internet for a solution but they seem not to be working (the Codes Found) and at times mess up other things
I am trying to copy and paste to infinity firstly if i get that wright I will copy the rest.
code:
Sub Copy()
Sheets("Fresh Fruit & Vegetables").Select
Range("A4:E114").Copy
Sheets("Order Summary").Select
Range("A12").Select
ActiveSheet.Paste
Dim pvtTbl As PivotTable
For Each pvtTbl In ActiveSheet.PivotTables
pvtTbl.RefreshTable
Application.OnTime Now + TimeValue("00:00:5"), "UpdateCell"
Next
End Sub
it does copy well now but it is not refreshing if you enter new data this does not appear until you run the code again.
Is there anyone who can help me with the above please.